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VIC rapport startar en bank i vilken vi samlar tips och 
förslag av alla sorter till din VIC 20 och VIC 64. De kan 
innefatta allt ifrån sladdanslutning till maskinkods- 
programmering. 

VIC rapport kommer att publicera dessa tips och förslag 
löpande. 

Skriv ner dina tips och förslag och skicka dem till 

VIC rapport, Tips och förslag 

Box 420 54 

126 12 Stockholm 


Allt som publiceras belönas! 





Ledaren 


Innehållsregister 


Vi har med glädje konstaterat att anta¬ 
let VIC-klubbar har ökat runt om i 
landet. Traditionellt har VlC-klub- 
barna startats av en eller flera VIC- 
entusiaster utan något annat gemen¬ 
samt än sitt stora intresse för VIC- 
datorer. 

Idag har det dykt upp en ny form av 
VIC-klubbar. Det är personalgrupper 
på företag som insett vikten av data¬ 
kunskaper. De har startat klubbar som 
håller till i företagets lokaler på kvälls¬ 
tid. 

En annan typ av företagsbundna 
VIC-klubbar är storföretag som cent¬ 
ralt ordnar kurser för företagets an¬ 
ställda för att de ska kunna hålla sig å 
jour med utvecklingen på datasidan. 
På en del företag lånar man t o m ut 
datorer till personalen. 

Oavsett former och hur VlC-klub- 
barna startas så tror vi på redaktionen 
på denna form av utveckling. Delad 
glädje är dubbel glädje. När man kan 
dela med sig av sina kunskaper och by¬ 
ta erfarenheter med andra entusiaster, 
kan man också få så mycket större nö¬ 
je av sin VIC-dator. 

Varför inte skriva ett brev och dela 
med Er av Era erfarenheter till en ännu 
större grupp. Vi på VIC-rapport är in¬ 
tresserade av bidrag. 

En möjlighet att dela med sig av sina 
erfarenheter är ett modem som tillåter 
kommunikation mellan VIC-datorer. 
Men hjälp av detta modem kan exem¬ 
pelvis VIC-klubben i Västerås sända 
meddelanden till VIC-klubben i Hapa¬ 
randa. Detta modem lanseras i dagar¬ 
na av Handic Software. Kontakta Din 
VIC-handlare för närmare informa¬ 
tion. 

VIC-redaktionen har i dagarna utö¬ 
kats med ytterligare en person; Nina 
Linander. Meningen är att hon så små¬ 
ningom övertar ansvaret för VIC- 
rapport. Ni kommer att få höra mer 
från henne senare. 
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Nybörja 

Del 4 
VIC-20 



kolan 


I detta nummer skall vi, som utlovat, titta lite på hur man 
flyttar markören på skärmen samt gör s k loopar och lite 
annat smått och gott. Som vanligt kan vi inte ta något an¬ 
svar för de som följder dessa sidor kan få för den erfarna 
programmeraren men hoppas att den kan ge något för 
den verklige novisen. 

Vi har tidigare lärt oss hur man skriver (PRINTrar) oli¬ 
ka saker på skärmen, hur man använder ”VICKE” som 
räknedosa etc. Vi vet också hur man använder variabler, 
både strängvariabler och numeriska (tal). I artikel två såg 


vi också exempel pa loopar, 
dessa. 

Loopar 

Med en loop menar vi ett programav¬ 
snitt som körs ett förutbestämt antal 
ggr. T ex kan vi tänka oss att vi vill 
skriva 

”HEJSAN” 
på skärmen tio ggr. 

Vi kan skriva detta som 
10 For 1=1 TO 10 
20 PR1NT ”HEJSAN” 

30NEXT 1 

1 den första raden i programet så ta¬ 
lar vi om hur många ggr vår LOOP 
skall köras, dvs hur många ggr da¬ 
torn skall utföra det som står på rad 
20 . 

För att tala om detta så måste vi 
först bestämma oss för att använda en 
variabel som vi räknar upp varje gång 
loopen har körts ett varv. I ovanståen¬ 
de exempel har vi alltså valt I för detta 
ändamål. Med I = 1 så talar vi om att 1 
skall börja räkna från 1. Ändras 1 till 
större värde så kommer alltså ett mind¬ 
re antal ”HEJSAN” att skrivas ut. 
Den variabel man använder för detta 
ändamål brukar man kolla LOOP1N- 
DEX, eller bara INDEX. 

Nästa ”ORD” på rad 10 är 
TO 10 

vilket talar om hur högt Loopindex får 
ökas innan vi går ur loopen dvs fort- 


lat oss titta lite närmare på 



sätter med eventuella rader efter rad 
30. Ändrar Du tio här till 100 istället så 
får du alltså 100 ”HEJSAN” utskriv¬ 
na på skärmen. 

På rad 30 så ligger NEXT 1. Detta 
ord kontrollerar om I är lika stort eller 
större än det tal vi angav efter TO, ef¬ 
ter att först ha ökat I med 1. Är det in¬ 
te det så sker ett hopp tillbaka till den 
rad där FOR ligger, och Loopen körd 
ännu en gång. Någongång så är för¬ 
hoppningsvis 1 lika med eller större än 
det som står efter TO och då låter 
NEXT programmet gå vidare. Om Du 
vill se vilket värde I har vid varje lopp¬ 
genomgång så kan du ändra rad 20 till 
20 PRINT ”HEJSAN”, 1 
dvs tala om för datorn att den för¬ 
utom ”HEJSAN” skall skriva ut vär¬ 
det på variablen I. 

Som du noterat så räknas 1 alltid 
upp med ett i ovanstående exempel. 
Detta är inte ett måste, utan man kan 


ta med ett kommando till för att ange 
hur mycket 1 skall ökas med varje gång 
vi går igenom loopen. Ändra rad 10 till 
10 FOR 1=0 TO 20 STEP3 
Om Du nu studerar värdet av I vid var¬ 
je genomgång av loppen så får Du 
0,3,6, 9, 12, 15, 18 

Innan ”READY” skrivs ut på skär¬ 
men. Med lite enkel huvudräkning kan 
Du direkt konstatera att I har ökats 
med 3 för varje varv i loopen. Adderar 
man tre till arton så får man resultatet 
21 vilket är större än tjugo och alltså 
kommer vi aldrig att få 21 utskrivet. 
STEP, med ett efterföljande tal, anger 
alltså hur mycket loopindex skall ökas 
med efter varje varv i loopen. 

Naturligtvis så finns det inget som 
säger att Du måste använda tal vid de¬ 
finitionerna av hur många ggr din loop 
skall köras. Det går lika bra att t ex 
skriva 
10X1 =0 
20 X2 = 20 
30X3 = 3 

40 FOR 1 = XI TO X2 STEP X3 
50 PRINT ”HEJSAN”, I 
60 NEXT I 

På detta sätt kan man innan loopen 
skall köras, bestämma hur många ggr 
den skall köras, eller ange det värde 
loopindex skall starta från. Man har 
också möjlighet att räkna ner i en loop 
genom att ange ett negativt tal efter 
STEP 

10 FOR K = 10 TO 1 STEP—1 
är ett exempel på detta. 

I artikel två i denna serie utlovades 
att vi skulle titta på ett program som 
skriver ut en multiplikationstabell helt 
enligt våra egna önskemål. Nu har vi 
kunskaper att göra en sådan. Ett sätt 
att göra det på är som följer. Kom ihåg 
att skriva 
NEW 

så att det program Du redan har i da¬ 
torn försvinner innan Du börjar slå in 
det här. 

10 PRINT ” DETTA PROGRAM 
SKRIVER” 

20 PRINT ”UT EN VALFRI” 

30 PRINT ”MULTIPLIKATIONS¬ 
TABELL” 

40 PRINT 

50 INPUT ”ANGE TABELL”; TB 
60 PRINT ” ”: REM RENSA 

SKÄRM 

70 PRINT TB; ”:ANS” 

80 PRINT ”MULTIPLIKATIONS¬ 
TABELL.” 
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90PRINT 

100 FOR I =0 TO 12 

110 PR1NT TB;” ”;I;” = ”;TB I 

120NEXT 

Programmet behöver väl inte kom¬ 
menteras vidare. 

” ” = Rensa skärm erhålls genom att 

trycka på SH1FT + 

Det finns naturligtvis ingenting som 
hindrar oss från att ha en loop inuti en 
annan. Följande program skriver ut al¬ 
la multiplikationstabeller från ”et¬ 
tans” till ”tolvans”. 

20 FOR X = I TO 12 

30 PRINT ” ”;X;”ANS”:PRINT- 

”MULT1PL1KATIONSTA- 

BELL”:PRINT 

40 FOR Y = 0TO 12 

50 PRINT X;”*”;Y;” ”;X*Y 

60 NEXT Y 

70 PR1NT:PRINT”TRYCK PÅ EN 
TANGENT!” 

80 GET AS :IF A = ” ”THEN 80 
90 NEXT X 

Det finns ett par saker i detta pro¬ 
gram som vi måste titta lite närmare 
på. För det första så måste vi vara no¬ 
ga med att sätta respektive 
FOR/NEXT sats i rätt ordning. I 
ovanstående exempel skall den loop 
som har index Y ligga innanför den 
som har index X. Detta betyder alltså 
att NEXT Y måste komma före NEXT 
X. Du kan ju byta raderna 60 och 90 
med varandra för att se vad som hän¬ 
der. 

Den andra saken som Du bör lägga 
märke till är att vi på några rader har 
skrivit ett och sedan gett ännu ett 
basic kommando. Detta är ett sätt för 


att minska ned det antal rader ett pro¬ 
gram kräver. Dvs istället för att skri¬ 
va 

10 PRINT ”KALLE” 

20 PRINT ”KAJSA” 
så kan man skriva 

10 PRINT ”KALLE”:PR1NT ”KAJ¬ 
SA” 

vilket ger exakt samma resultat. Vilken 
metod man föredrar är helt upp till en 
själv men vill man ha ett lättläst pro¬ 
gram är nog den första metoden att fö¬ 
redra. Du bör dock veta att man kan 
spara in lite minne genom att använda 
sig av den andra metoden men att detta 
i de flesta fall varken gör till eller från. 

Den tredje kommentaren kretsar 
kring rad 80. I denna rad hittar Du tre 
nya basic kommandon. 

GET 

IF 

THEN 

Den första av dessa (GET) tar in ett 
värde från tangetbordet i den variabel 
som följer den. Du kan skriva in föl¬ 
jande program för att se hur det här 
fungerar. 

10 GET AS 
20 PRINT AS 
30 GOTO 10 

GOTO i detta program gör precis 
vad den ser ut att göra dvs ”GÅR 
TILL” den rad som anges. 

När programmet ovan körs så ser 
det först ut som om ingenting händer. 
Tryck på en tangent så får du se. Ja 
just det. Den tangent Du trycker på 
skrivs ut på skärmen. 

Med 

GETAS 



så får alltså AS värdet, bokstaven/siff¬ 
ran, som man trycker ned. OBS! dock 
att AS även får ett värde när du inte 
trycker ned en tangent. Detta värde 
kallar man TOMSTRÄNG och är pre¬ 
cis samma som ges när PRINT ” ” 
körs. Att detta är ett VÄRDE för va¬ 
riabeln AS kan kanske tyckas vara lite 
underligt men man kan tänka sig att en 
TOMSTRÄNG representerar samma 
sak för strängar, som en nolla gör för 
siffror. 

Instruktionerna IF/THEN skall vi 
titta lite mer på senare men vi kan av¬ 
slöja redan nu att de används för att 
testa om något är SANT och utför det¬ 
ta NÅGOT bara Om det vi testat är 
sant. Det som skall testas skall stå efter 
IF och det som skall utföras, om 
SANT, skall stå efter THEN. 

Och så var det så den utlovade tids¬ 
fördröjningen. Du har säkert redan 
gissat att detta kan åstadkommas helt 
enkelt genom att ordna till en loop som 
inte gör något alls. 

Följande programsnutt är ett sätt att 
lösa detta på. 

10 PRINT ”PAUS” 

20 FORI = 0 TO 5000:NEXT 
30 PRINT ”EN TID HAR GÅTT.” 

Som Du kanske noterat så har jag 
ibland utelämnat I, eller vad nu loop- 
index är, från NEXT kommandona. 
Detta går alltid bra att göra. Även i de 
fall man har flera loopar i varandra. 
En nackdel har det dock. Man ser inte 
lika lätt i sitt program var den ena loo- 
pen börjar och den andra slutar. Så till 
en början, innan Du är riktigt van kan 
det löna sig att sätta ut dessa. 
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Markörförflyttningar 

Genom att trycka på CRSR tangenter¬ 
na på tangentbordet kan Du som Du 
sett, och säkert använt dig av åtskilliga 
ggr, flytta omkring markören på skär¬ 
men. Vad Du kanske inte vet är att du 
även kan använda dessa i dina PR1NT 
kommandon. Detta Är mycket an¬ 
vändbart i många fall och kan t ex va¬ 
ra nyttigt att kunna när man skall göra 
spel och liknande. Det är dock inte ba¬ 
ra dessa tangenter Du kan använda ut¬ 
an även andra tangenter som påverkar 
skärmen på något vis går bra. Låt oss 
göra en lista över dem: 

Shifl + CLR/Home 

Flyttar upp markören till översta 
vänstra hörnet efter att först ha rade¬ 
rat hela skärmen. 

Inom situationstecken skrivs 

CLR/home 

Flyttar upp markören till översta 
vänstra hörnet av skärmen utan att ra¬ 
dera den. 

Inom situationstecken skrivs 


INST/De! 

Tar bort det tecken som står före mar¬ 
kören. 

Inom situationstecken skrivs 

CRSR Upp 

Flyttar markören uppåt en rad. Inom 
situationsteckens skrivs 

CRS Ner 

Flyttar ned markören en rad. Inom si¬ 
tuationstecken skrivs 

CRSR Vänster 

Flyttar markören ett steg åt vänster. 
Inom situationstecken så skrivs 

CRSR Höger 

Flyttar markören ett steg åt höger. In¬ 
om situationstecken så skrivs 
Med ÅÄÖ installerat 
De tecken som skrivs ut när man 
trycker på en av dessa tangenter kallas 
KONTROLL TECKEN. 

Användning av SHIFT + CLR/HO¬ 
ME har vi redan sett användas i de 


exempel vi tittat på i detta nr. Förutom 
att använda dessa tangenter så kan 
man också använda tangenterna för 
att byta färg och få reverserade tecken 
alltså dem man kan hitta under siffror¬ 
na. Testa dessa i olika printkomman- 
don. Ha roligt! Du kan ju inte förstöra 
något, så vad gör det om något blir fel. 
Ha det så bra tills nästa månad då vi 
skall titta på nya SPÄNNANDE saker 
Du kan använda ”VICKE” till. 

5 PRINT”(SH1FT + CLR/HO- 
MEKCRSR NER)(RVS ON)(22 blank- 
tecken)(RVS OFF)" 

10 PRINT”(SHIFT + CLR/HOME)” 
20 FOR I = 1 TO 20 
30 PRINT”(SHIFT + CLR/HOME)” 
40 FOR J=0TO 1 
50 PRINT”(CRSR HÖGER)”; 

60 NEXT J 

70 PRINT CHR (65+1); :FOR K=1 
TO 90: NEXT:PRINT 
80 NEXT I 

90 PRINT”(SHIFT + INST/DEL)” 

100 GOTO 5 

Det som står inom parenteser skriver 
Du inte in i detta program utan gör det 
som står inom prentesen istället. T ex i 
fallet (SHIFT + CLR/HOME) så hål¬ 
ler Du alltså SHIFT-tangenten ned¬ 
tryckt medan Du trycker på CLR/- 
HOME-tangenten. Programmet pre¬ 
senterar inte särskilt mycket men kan, 
förhoppningsvis, introducera dig i 
markörförflyttningen värld. 
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HEJ! 


Biforgar programlista till ett bollspel 
för Commodore 64. Det kan med små 
ändringar köras även på VIC 20. 

Det gäller att plocka så många po¬ 
äng som möjligt. Spelet har 4 nivåer. 
På de första (upp till 300 resp. 3000 
poäng) har man en bredare 'spade’ att 
studsa bollen med, — över 3000 blir 
'spaden' smalare, då den horisontella 
delen försvinner. Fjärde nivån uppnås 
på 6000 poäng. 

Bollen studsar mot väggar och tak, 
och när den träffar 'spaden' studsar 
den 'logiskt' åt det håll som ytan lutar. 


När ett tecken plockas i raderna upptill 
på skärmen, blir riktningen på bollen 
slumpvis rakt ner eller snett ned åt hö¬ 
ger eller vänster. Ett ljud avges vid var¬ 
je studs eller teckenplockning. 

Bommar man bollen med 'spaden' 
förloras bollen. Tre nya bollar fås för 
varje nivå som uppnås, och ev. kvarva¬ 
rande bollar från tidigare nivåer får 
behållas. När alla bollar missats är spe¬ 
let slut. En ringklocka ringer och spelet 
startar på nytt när mellanslagstangen- 
ten trycks ned. 

Maximalt uppnådda poäng sparas 
givetvis och visas hela tiden vid sidan 
av aktuell poäng. 

För den som vill skriva om spelet till 


VIC 20 gäller att VIC 20 har mycket 
enklare ljudkommandon, varför rad 
22 (som nollställer hela ljudregistret) 
kan hoppas över, och rad 370—410 
ska ändras. 

På VIC 20 kan tecknen skrivas ut 
över hela skärmbredden (ändra rad 
500). RF på rad 10 är början av färg¬ 
minnet. 

När du tryckt in programmet, så 
spara det först på band innan du prov¬ 
kör. Mängden POKE-kommandon 
bäddar annars för att datorn hänger 
sig om du gjort något fel. 

Mycket nöje! 

Birger Gran 
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Grattis på 
25-årsdagen 

COMMODORE! 


Ett kvarts sekel med Commodore: 
Från detaljist till världsomfattande jät¬ 
te. 

På bara 25 år har en liten skrivma¬ 
skins och reparationsrörelse undan¬ 
skymt lokaliserad i kärnan av staden 
Toronto, Canada, utvecklats till en av 
de mest intressanta personadatorföre- 
tagen i världen. Commodore Interna¬ 
tional Limited. 

Företaget levererar mer produkter 
runt om i världen än något annat data¬ 
företag. Commodore har växt från en 
omsättning på 46 miljoner dollar 1977, 
till över 680 miljoner dollar 1983, 
(bokföringsåret slutade 30 juni). Myc¬ 
ket av framgångarna har att göra med 
den entreprenörs anda som präglar 
Commodores grundare och nuvarande 
vice ordförande, Jack Tramiel. 

Den polsk födde Tramiel överlevde 
nazisternas koncentrationsläger under 
andra världskriget. 1958 emigrerade 
han till Nordamerika och öppnade sin 
egen skrivmaskins affär i Toronto. 
Tramiel har alltid haft ”näsa” för vad 
som efterfrågas i framtida hem och fö¬ 
retag i elektronikväg. Dessutom har 
han snabbt haft möjlighet att tillgodo¬ 
se sina kunders önskemål. Commodo¬ 
res framgång bygger på denna affärsfi- 
losofi. 

Under 25 år har Tramiel ledsagat 
Commodore från mekaniska räknema¬ 
skiner, miniräknare, digitala arm- 
bandsur fram till persondatoråldern. 
Tillsammans med kunnig företagsled¬ 
ning runt om i världen försöker Trami¬ 
el utröna: vad väntar härnst? Commo¬ 
dore är erkänt för sitt enkla men genia¬ 
la sätt att agera ”håll fast vid det gam¬ 
la så länge det är bra, byt till det nya så 
fort det blir bättre än det gamla. 

Under tidiga år växte Commodore 
från skrivmaskinsreparatör och försäl¬ 


jare till skrivmaskinstillverkare genom 
förvärv av en fabrik i Berlin, Västtysk¬ 
land. I början av 60-talet började Tra¬ 
miel sälja och bjuda ut en stor mängd 
olika kontorsutrustning och dessutom 
nationellt distribuera kontorsmöbler åt 
ett företag i branschen. 

1965 köpte Commodore möbeltill¬ 
verkaren och flyttade sin verksamhet 
till vad som nu är Commodores nuva¬ 
rande kanadensiska huvudkontor. Fö¬ 
retaget tillverkar fortfarande kontors¬ 
möbler (som huvudsakligen passar till 
företagets persondatorsortiment). Vid 
sin fabrik i Scarborough, Ontario. He¬ 
la kontorsmöbelverksamheten har ex¬ 
panderat till tre kontor och två till¬ 
verkningsenheter i Torontos grann¬ 
skap. 

Under år 1965 träffade även Tramiel 
den kanadensiske advokaten och fi¬ 
nansiären, Irving Gold, som senare 
blev Commodores styrelseordförande. 
Dessa två tillsammans byggde upp och 
formade företaget till vad det är idag. 
En av de första saker de gjorde var att 
sälja Commoderes mekaniska räkne- 
maskinsfabrik och istället försöka hit¬ 
ta ett Japanskt företag som kunde till¬ 
verka räknemaskiner som Commodore 
istället kunde distribuera. När Tramiel 
var i Japan och för första gången fick 
syn på elektroniska kalkylatorer, insåg 
han snabbt att den mekaniska räkne¬ 
maskinens framtid var förbi. Av detta 
drog Tramiel slutsatsen: tar vi inte upp 
den här produkten nu kommer någon 
annan göra det före oss. Tramiel age¬ 


rade snabbt och fann snart en tillver¬ 
kare av elektroniska räknare som var 
villig att tillverka produkterna med 
Commoderes namn. På grund av detta 
var företaget redan med från början i 
den nya branschen. 

Företaget började tillverka sina egna 
elektroniska kalkylatorer 1969, med 
Texas instruments komponenter 
(chips). Faktum är att Commodore var 
det första företaget på marknaden som 
började sälja s k ”mimiräknare” i 
fickformat —cl08:an—, som är ett 
exempel på vad som blivit Commodo¬ 
res riktmärke, vara först på markna¬ 
den med något nytt. 

Intressant att notera är att denna 
produkt såldes till i stort sett samma 
pris, genom samma distributions kost¬ 
nader och till samma kunder som till 
den populära V1C-20 datorn idag gör. 

Fram till 1974 utökade Commodore 
sitt sortiment från enkla fyra funk- 
tionsräknare, vetenskapsmodeller och 
programmerbara tangentbordsmodel- 
ler. Vid denna tidpunkt var företaget 
mycket beroende av en tredje part — 
de som tillverkade ”chips” och lys¬ 
diodrar som ingick i Commodores pro¬ 
dukter. 

1975 beslutade sig Texas Instrument 
för att gå emot sina egna kunder, ge¬ 
nom att själv börja tillverka elektronis¬ 
ka kalkylatorer. Samtidigt med detta 
sjönk ”chip” priset från 12 till en dol- 
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Sortering med Basic 
— UTAN VÄNTETID! 


lar. Detta medförde att Commodore 
satt fast med ett stort lager av ”chips” 
och räknare när marknadspriset på 
produkterna kraftigt sjönk. Det var 
vid denna tidpunkt Tramiel bestämde 
sig för att företagets utveckling inte 
skulle ligga i andra företags händer, 
utan Commodore skulle i större ut¬ 
sträckning styra sitt eget öde. 

Kort därefter, 1976 köpte Commo¬ 
dore MOS Technology Inc en av före¬ 
tagets leverantörer av ”halvledare”. 
Detta för att i större utsträckning bli 
vertikalt integrerade. Detta har i sin 
tur fört med sig att Commodore nu är 
självförsörjande på komponentsidan, 
som i sin tur medför att företaget har 
betydligt längre s k ledtid (från pro¬ 
duktutveckling till kommersiell lanse¬ 
ring) för sin utveckling av nya produk¬ 
ter. Detta faktum leder till kostnads¬ 
fördelar, som i sin tur visar sig i pro¬ 
dukter till lägre pris och bättre prestan¬ 
da. 

Köpet av MOS Technology följdes 
av ytterligare två förvärv inom loppet 
av 18 månader: köpet av Frontier, en 
Los Angeles tillverkare av ”chips” 
som kompletterade de från MOS, och 
förvärvandet av Dallas baserade Micro 
Display System Inc. En tillverkare av 
”liquid crystal display” utrustning. 
Resultatet av dessa företagsköp inne¬ 
bar att Commodore hade bättre intern 
expertis och produktion i flera nyckel¬ 
teknologier än något annat större före¬ 
tag i branschen. 

Under 1976 omorganiserade Com¬ 
modore sin samfällda struktur — 
Commodore International Limited — 
och flyttade sitt finansiella huvudkon¬ 
tor till Bahamas, och sitt verkställande 
högkvarter till Wayne i Pennsylvania 
(det har sedan dess flyttat till West 
Chester i Pennsylvania). 

Näst förjande år var ”avstampet” för 
Commodore — som fortfarande del¬ 
tog i framtidsutveckling i gammal god 
Commodore stil — då företaget intro¬ 
ducerade sin första persondator, 
PET:en. PET:en (Personal Electroic 
Transactor) använder MOS-tillverkade 
6502 microprocessorer som också an¬ 
vänds av en del av Commodores kon¬ 
kurrenter. Det var denna orginal ma¬ 
skin, som introducerades på Hanno- 
vermässan i Tyskland och vid konsu¬ 
ment elektronik-mässan i USA, som 
”döpte” persondator marknaden av 
idag. 


I anslutning till artiklarna om sortering 
i VIC-rapport nr 5/6, vill jag bekräfta 
att väntetiden vid sortering av större 
datalistor är oacceptabelt lång med 
program skrivna i BASIC. 

Jag stötte på detta problem när jag 
arbetat med ett statistikprogram till 
Commodore 64-an. Där behöver data¬ 
listan sorteras för att få fram median¬ 
värdet samt för frekvenstabellerna. 
Väntetider på en halv timme för 
2—300 poster är avskräckande — och 
att sortera 1000 poster (som program¬ 
met i övrigt klarar av att bearbeta) vå¬ 
gar jag inte ens tänka på, eftersom 
tidsåtgången ökar exponentiellt. 

Lösningen blir i stället följande prin¬ 
cip: utnyttja datorns överlägsna has¬ 
tighet under inmatningsfasen. Tek¬ 
niskt går det till så att en parallell mat¬ 
ris läggs upp dit de inmatade posterna 
direkt placeras i storleksordning. 

För de beräkningar som fordrar en 
sorterad lista används B-matrisen och 


för korrelationsanalyser m m används 
den ordinarie A-matrisen. 

Om datalistan ska sparas i datafil på 
band, måste man naturligtvis tänka på 
att spara både A- och B-matrisen, då 
vitsen med storteringsrutinen annars 
går förlorad. Detta tar dock ej påtag¬ 
ligt längre tid. 

Här följer en utskrift av ett pro¬ 
gramexempel, som sorterar valfri stor¬ 
lek av datalista (upp till 2000 poster) 
och sedan skriver ut originallistan 
följd av en utskrift av den sorterde lis¬ 
tan. 

Birger Gran 

PS. Återkommer senare med en be¬ 
skrivning av statistikprogrammet, som 
kanske är för långt att publicera, då 
det tar 7 sidor på printern. Annars 
kanske det har ett allmänt intresse, ef¬ 
tersom nyttoprogrammen fortfarande 
är alltför få till hemdatorerna. DS. 


SORTERINGSRUTIN 


5 REM SORTERINGSRUTIN RV B. GRRN 

7 PRINT".T :N=0-DIMH<2000)/B<2000) 

8 N=N+1:T*="":INPUTT$:IFT$=""THEN15 

9 T=VAL<T*> A<N>=T 

10 X=0 : F0RI=1T0N-1:IFT<B<I)THENX=I:I=N-1 

11 NEXT 

12 IFX=0THENBCN>=T : G0T08 

13 F0RJ=NT0X+1STEP-1■B(J)=B(J-l) : NEXT•B<X)=T : G0T08 

13 N=N-1 : PRINTTJINMATRD LISTfl":F0RI=1T0N:PRINTflCI);:NEXT 

16 PRINT ; PRINT : PRINT"SORTERAD LISTA" 

17 FORI=1TON : PRINTBCI); : NEXT 

READV. 
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Äntligen har Electronic Arts programutbud kommit till 
Sverige genom Handics försorg. Extremt välgjorda pro¬ 
gram, snyggt förpackade och utförligt dokumenterade. 
Jag har haft turen att få testa två stycken, nämligen 
M.U.L.E. och Music Construction Set. 


M.U.L.E. 

står för ”Multiple Use Labor Ele¬ 
ment”, fleranvändbart arbetskrafts- 
element alltså, men ordet ’mule’ bety¬ 
der mula, mulåsna. Det är med hjälp 
av dessa bråkiga, bångstyriga mulor 
som du ska kolonisera planeten Irata 
och försöka tjäna så mycket pengar 
som möjligt på 6 eller 12 månader. 

En typisk spelomgång kan se ut så 
här: 

Speldisketten stoppas in och du lad¬ 
dar in programmet ”EA” som i sin tur 
laddar in själva spelprogrammet 
medan Electronic Arts tjusiga logotyp 
visas på skärmen, konstant ändrandes 


färg. Under tiden kan du bläddra lite i 
regelhäftet och studera sidorna med 
specialtips om spelet eller läsa vad de 
fyra spelkonstruktörerna har för tak¬ 
tik. Programmet startar automatiskt 
med att visa en liten tecknad film och 
spela tjusig musik, originalskriven av 
Roy Glover. Trummor, trestämmigt 
och lika pampig som Star Wars melo¬ 
din! Du kan välja mellan 3 svårighets¬ 
grader Beginner, S-tandard och Tour- 
nament samt antalet personer från 0 (!) 
till 4. Det är alltid 4 spelare med i spe¬ 
let, de som inte styrs av mänsklig hand 
tar datorn kontroll över. Om du väljer 
0 spelare kör datorn alltså en demo- 
runda där han själv tar hand om alla 


spelarna. Skillnaden mellan de olika 
svårighetsgraderna är bl a hur många 
omgångar man ska spela, hur snabbt 
utdelningen av land går, möjligheten 
att gräva efter Chrystite, att ha auk¬ 
tion på land m m. Mer om detta sena¬ 
re. 

Nu till en verkligt smart sak: val av 
joystick/tangentbord. Datorn uppma¬ 
nar alla deltagare att trycka på sin fire- 
knapp och avgör vilken joysticksport 
som 'pinnen” sitter i eller (om man är 
flera spelare) om man vill använda tan¬ 
gentbordet. Så borde det vara på flera 
spel tycker man för vartannat spel an¬ 
vänder ju port 1 och vartannat port 2, 
ofta utan att ens tala om vilket. Först 
när rymdskeppen kommer susande 
mot dig märker du att du har joystic- 
ken i fel port! Men tillbaks till spelet. 

Varje spelare får välja färg och spe- 
larfigur. Åtta olika varelser med olika 
namn, egenskaper och hemplaneter 
finns till förfogande, däribland en 
människoliknande för experter och en 
”f-lapper” för nybörjarna. Medan 
man väljer får man se dem framifrån 
bakifrån och från sidorna. Till sist är 
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vi redo att landa på planeten och börja 
spela. 

Rymdskeppet landar i den lilla sta¬ 
den och ut tumlar vi 4 glada kolonisa¬ 
törer, redo att börja odla marken i 
floddalen, sätta upp våra solfångare 
på slättlandet och börja med lite 
gruvdrift i bergen. Men vad allt är 
dyrt! Nåja, vi får ju ett litet startkapi¬ 
tal och marken är gratis. En svart fyr¬ 
kant glider över landskapet och när 
den är över en plätt som verkar bra 
trycker man på fireknappen. Har man 
tur och ingen annan hinner före så får 
man en tomt att bruka, men först mås¬ 
te du bebygga tomten. När det blivit 
din tur att gå på en shoppingrunda i 
staden så går du och köper dig en mula 
i inhängnaden i stadens östra del. 
Finns det gott om mulor är priset lågt 
och vice versa. Välj sedan hur du vill 
utrusta mulan och gå in i rätt affär, 
spring till din landbit och tryck på fire¬ 
knappen. Vips, så är mulan förvand¬ 
lad till en jordbruks-, energi-, eller 
gru venhet! 

Har du gott om tid (vilket beror på 
hur mycket mat du har i lagret) kan du 
försöka fånga den mystiske Wampu- 
sen som bor i hålor i bergen. Om du 
får tag i honom så betalar han en 
ordentlig lösensumma. Om du vill kan 
du istället springa tillbaks till staden 
och gå på Puben där du vinner en slant 
på spel, ju mer tid kvar desto mer vin¬ 
ner du men mest är det slumpen som 
avgör. När din tid tagit slut (eller om 
du rusade in på Puben) så är det näste 
mans tur. 

Efter det att alla är färdiga så startar 
produktionen som styrs av tomternas 
lämplighet, varje spelares energiförråd 
och naturligtvis slumpen. Olika natur¬ 
katastrofer sätter hinder i vägen, bl a 
pest, planetbävningar, solfläckar, me¬ 
teoriter o s v. Nu kommer den roligas¬ 
te biten: auktionerna. 

De som har överproduktion säljer 
till högsta möjliga pris och de som inte 
har tillräckligt försöker köpa billigt, 
allt helt visuellt genom att säljarna är 
överst i bild och ’går ner’ i pris medan 
köparna startar i underkant och går 
uppåt. Detta köpslående kan bli verk¬ 
ligt roligt om man är några stycken 
som kan skrika ut hotelser, löften och 
förbannelser medan buden höjs och 
sänks. 

Efter det att ställningen har visats 
börjar nästa omgång med nya utma¬ 


ningar, beslut, bekymmer och fram¬ 
gångar. Den som efter 6 eller 12 spel¬ 
omgångar har mest tillgångar i form av 
pengar, land och varor vinner, men he¬ 
la kolonin måste ha en viss gemensam 
vinst för att ha 'lyckats’. Samarbete är 
alltså nödvändigt. Nå, hur bra är det 
här spelet då? Svar: mycket, mycket 
bra. Roligt, omväxlande, krävande, 
spännande, välgjort, realistiskt. Mu¬ 
sik, grafik, regler, allt är i toppklass. 
Särskilt roligt är det om man är 2 eller 
flera spelare men man kan även spela 
själv mot datorn. Många drag har lå¬ 
nats från vanliga sällskapsspel, typ 
Monopol, men anpassasts till datorn. 
De många olika slumpmomenten som 
alltid är bra för den som ligger sist och 
dåliga för den som leder tillsammans 
med handikappsystemet med olika fi¬ 
gurer gör spelet jämnt. Svårighetsgra¬ 
derna är lämpligt avpassade för att 
föra in nya moment som gör spelet mer 
komplicerat när man lärt sig de enklare 
transaktionerna. Finns det då inget ne¬ 
gativt att säga om M.U.L.E.? 

Jodå, några svaga punkter märker 
man, exempelvis så måste man stänga 
av datorn och ladda in programmet på 
nytt om man vill byta färg/figur/antal 
spelare. Inte så bra. Man får heller inte 
se hur datorn går runt i staden och kö¬ 
per mulor och utrustar dem. Det bara 
plingar till så har han ett solkraftverk 
här och en gruva där. Han fuskar inte 
sägs det, men vem vet? 


Sammantaget, ett jättebra spel som 
inte bör saknas hos någon spelgalning. 
Bör kunna locka hela familjen/gänget 
till datorn, även de som tycker Jump- 
man och Frogger är för svåra att spela. 
Och priset är ju rätt lågt, jämförelse¬ 
vis, bara 375:—. Kräver VIC 64, 1541 
disc drive, monitor, joystick. 

Music Construction Set 

är skrivet av Will Harvey, 16 år (!) och 
handlar alltså om musik som namnet 
antyder. Med hjälp av detta program 
ska du kunna författa musik, koppla 
ihop en bunt noter med en vacker me¬ 
lodi samt testa olika rytmer och klang¬ 
er. 

Programmet EA laddas in och det 
laddar i sin tur in huvudprogrammet 
på samma sätt som M.U.L.E. Ett not¬ 
system med melodi- och basstämma 
skrivs ut med ungefär 2 takter synliga. 
Linder notsystemet till vänster finns al¬ 
lehanda noter, pauser och förtecken. I 
mitten finns indikatorer för tonart, 
takt, hastighet, ljudform och volym 
samt en takträknare. Till höger finns 
olika symboler, bl a ett piano (spela), 
ett hus (home dvs utgångspositio¬ 
nen), sax och lim (editering) och en dis¬ 
kett (för diskoperationer). Om du inte 
trycker på RETURN börjar en demo- 
runda som spelar den 13 låtar som föl¬ 
jer med på disketten, samtidigt som 
noterna susar förbi på skärmen. 

Annars dyker en liten hand upp som 
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du styr med din joystick, plockar upp 
noter och placerar dem i notsystemet, 
ändrar takt och ljudform, provspelar 
och till sist sparar stycket på diskett. 

Detta verkar ju enkelt och behändigt 
i teorin men hur har konstruktören lyc¬ 
kats i praktiken? Nåja, det är ju tjusigt 
med detta ”LISA-Iiknande” arbetssätt 
men för att det ska fungera krävs nog 
en ’mouse’ eller åtminstone en propor- 
tionerlig joystick. Det är väldigt segt 
om man ska flytta 16 sextondelar från 
nedre vänstra hörnet till notsystemet 
uppe till höger. Tangentbordsfunktio- 
ner finns inbyggda som gör inknapp- 
ning av melodier möjlig men då har ju 
hela finessen med det visuella notssy¬ 
stemet försvunnit. 

Dessutom blir det lätt grötigt på 
skärmen vilket gör det mycket svårt att 
peka på rätt not som ska flyttas och att 
sedan placera den på rätt ställe är inte 
heller lätt. 

Nu låter det som om Music Con- 
struction Set är dåligt men så är inte 
fallet. 1 samma klass som M.U.L.E. är 
det inte riktigt men det är ett väldigt 
proffsigt program som man kan ha 
mycket roligt med. För musikkunniga 
är det säkert användbart eftersom man 
kan transponera till önskad tonart, 
ändra takt, pröva olika komp och få 
noterna utskrivna på skrivare. Det sist¬ 
nämnda går dock så långsamt att man 
nästan aldrig gör det och dessutom 



måste trycka på en tangent efter 2 1/2 
takt för att utskriften ska fortsätta. 
Orsaken till dessa båda olägenheter är 
antagligen att det handlar om ren ko¬ 
piering av högupplösningsskärmen, en 
s k hardcopy, istället för en speciell ru¬ 
tin för skrivarutskrift. 

Två andra finesser som åtminstone 
jag gärna såg är att kunna sätta at- 
tack/decay/release/sustain, helst med 
grafisk uppritning. Jag tycker det är 
jobbigt att tänka hur ett ljud är upp¬ 
byggt om man inte har ett litet diagram 
att titta på. En möjlighet att spela me¬ 
lodier även i egna program skulle vara 
användbart. Jämför Pinball Construc- 


tion Set här nedan som har en Make 
Game möjlighet. 

Slutligen vill jag säga att ljudet är 
mycket bra, särskilt om man kopplar 
datorn till en stereoanläggning, och att 
dokumentationen håller samma höga 
klass som Electronic Arts övriga pro¬ 
dukter. Relativt lågt pris på 375:— gör 
Music Construction Set till ett mycket 
intressant program trots att det inte är 
helt utan brister och nackdelar. 

Kräver VIC 64, 1541 disc drive, joy¬ 
stick. 

Stefan Andersson 


600 

program till 

VIC-64 

och 

VIC-20 

Dato:er och tillbehör! 
Katalog 92 sidor 15 kr. 



DATAMÄKLAREN 


Vasavägen 61 C, Linköping 
Tel. 013-10 31 74 


Pinball Construction Set 

Ett helt outständing program från 
Electronic Arts. Mycket mer än så här 
kan man nog inte få ut av 64:an. Man 
ska alltså konstruera och spela flipper- 
spel och när man är färdig kan man 
göra ett spel och ge bort till en kompis 
eller sälja. När du laddar in program¬ 
met visas en höggrafikbild med Elec¬ 
tronic Arts logo med färgändringar. 
Sedan får du upp på vänster halva en 
tom flipperspelsram samt på höger 
halva en mängd delar, t ex bumpers, 
flipperarmar, bollfångare, magneter. 

Du för en liten hand och tar tag i nå¬ 
got som du vill ha med i spelet och drar 
ut det till spelbrädet. Du kan även dra 
fram en fyrkant som du sedan kan for¬ 
ma precis som du vill. Många finesser, 
du kan förstora en del av skärmen och 
ändra varje liten punkt, du kan prov¬ 
spela, du kan koppla ihop flera saker 


så att det ger bonus när du träffat all¬ 
ihop samt ändra fart, gravitation och 
studs. En fin sak är möjligheten att 
spara ett komplett spel som kan spelas 
utan PCS som du kan ge bort till folk. 

Omslaget är bra, först tror man att 
det är en maxisingel men skenet be¬ 
drar. Det medföljer en instruktionsbok 
som är toppen + en minneslapp som 
också är bra att han och så står det om 
honom som konstruerade spelet och 
hans bakgrund. 

Det enda negativa är ljudet, synthe- 
zisern utnyttjas inte fullt ut, men an¬ 
nars är det ett bra spel som man inte 
tröttnar på i första taget. Ett av de 
mest prisvärda programmen på mark¬ 
naden. 

Kräver VIC 64, 1541 disc drive, joy¬ 
stick. 

Joakim Aspengren 
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ZX SPECTRUM 


Hela tidningssidan är en beställningskupong. Kryssa för under bilderna de program du vill ha 





ESCAPE 16 k 

3-D labyrint med 
jagande monster 

Pris 89:75 


LUNA CRABS 16 k 

Försvara rymdskeppet 
mot krabborna. 3-D 
grafik. 

Pris 109:75 


JUNGLE TROUBLE 
16 k 

Över floden, genom 
skogen i lianer över 
elden. Rörlig grafik 

Pris 89:75 



ANT ATTACK 48 k (J)* 

Animerad 3-D grafik. 
Taktik och action. 

Pris 109:75 



ATIC ATTACK 48 k 

Rörlig, snabb grafik. 
Försäljningsetta i 
England. 

Pris 89:75 



MANIC MINER 
48 k (J)* 

20-tal labyrinter med 
ökande svårigheter. 
Grafik. 

Pris 96:25 


□ 







••••• •••••• 




WWW www ^ 

jnuägrfå 

•••••• m 

Den nya programklubben 

med oslagbara introduktionserbjudanden: 

1. Du blir medlem utan kostnad. 

2. Vid köp av 3 program — betalar du bara för 2. 

Topprogram fran de engelska och amerikanska 
bestseller-listorna. 


EVEREST ASCENT 
48 k 

Bestig Everest. Stra¬ 
tegi/äventyr. Grafik. 

Pris 109:75 


VIC-20 


ALCHEMIST 48 k 

Animerad grafik. Du är 
trollkarl med magiska 
krafter mot faror. 

Pris 89:75 


TASWORD TWO 48 k 

Avancerat ordbehand¬ 
lingsprogram. På 
svenska. Anpassat till 
olika interface och till 
Microd riven. 

Pris 229:— 



FALCON FIGHTER 
oexp. (J)* 

8 olika nivåer (planer). 
Flyg över landskap och 
bomba. 

Pris 96:25 



METAGALACTIC 
LLAMAS oexp. 

Mot stjärnorna — 
snabbt, färgstarkt. 
Ljudeffekter. 

Pris 96:25 


□ 



TERMINATOR oexp. 

Invadertyp. 16 ol. typer 
av anfallare + Zaggers 
o meteors. 

Pris 109:75 



SKYHAWK min 3 k 
exp. (J)* 

3-D effekt. Rörlig 
grafik. Du flyger och 
försvarar dig mot 
anfall. 

Pris 129:50 



LASER ZONE min 8 k 
exp. 

Försvara utposterna 
genom koordinering av 
2 plasmakanoner. 

Ett svårt spel. 

Pris 96:25 



THE QUEST OF 
MERRAVID 16 k exp. 

Äventyrsspel. Du 
kämpar mot drakar och 
andra hemska ting. 

Pris 129:75 


COMMODORE —64 


* Kan spelas med Joystick. 























































































Hur relaterar man tid till en mikroda¬ 
tor? Kristalluret i VIC 20 och VIC 64 
har en frekvens på 7 MHz. Det betyder 
att den ”tickar” en miljon gånger per 
sekund. Ett flertal maskinspråk (som 
t ex INX och CLC) gör beräkningar 
inom loppet av två ”tick”, d v s det 
tar två miljonderal av en sekund att ge¬ 
nomföra en beräkning. 

Nu ska vi förändra måttenheterna i 
datorns klocka och göra varje ”tick” 
till en sekund (multiplicera klockan 
med en miljon). På så sätt kan man 
bättre illustrera hur lång tid en dator 
tar på sig för att göra beräkningar. Det 
som tar datorn en sekund att räkna ut, 
tar 278 timmar eller 11,5 dagar att räk¬ 
na ut för hand. Här följer en tabell 
som jämför verklig tidsåtgång jämfört 
med hur många ”tick” och tidsåtgång 
med den nyss beräknade modifierade 
klockan. 

Tabellen ovan ger en lite bättre in¬ 
sikt hur snabb en microprocessor är. 
Här kommer en annan fråga till Dig: 
Om Du skulle arbeta 11,5 dagar i 
sträck med bara en halvtimmes rast var 


Miljoner och . . . 


(av Jim Gracely) 


Tack vare modern teknologi arbetar 
Din dator med mätningar som rör sig i 
storleken ”en miljon”. Det är en 
punktlig klocka som tickar över åtta 
miljoner gånger per sekund och med 
”chips” med komponenter, inte större 


än 50 miljondel av en meter. 1 den här 
artikeln undersöker vi måtten tid och 
storlek i förhållande till en 6502- 
”chip” (kiselbricka). 

Stora tal är både mystiska och fasci¬ 
nerande. Liknande förhållande råder 


för små tal. När vi vill beskriva någon¬ 
ting större än någonting annat använ¬ 
der vi uttryck som ”miljoner”: ”Det 
är en chans på en miljon att Du gissar 
rätt”, eller ”Det måste finnas miljon¬ 
tals av dem”. Så fort talet blir riktigt 
stora förlorar vi fattningen om hur sto¬ 
ra de egentligen är. 

Ett intressant exempel är att testa 
Din förmåga att förstå stora tal. Utan 
att använda kalkylator eller dator, för¬ 
sök att välja vilket av följande exempel 
som är mest pengar. 

1. Två ton guld (marknadspriset 11 
oktober 1983). 

2. En ”tio-centare” per inch (2,54 cm) 
mellan New York och Los Angeles. 

3. En ”fem-centare” per yard (0.9 m) 
mellan jorden och månen. 

1 detta exempel är måttenheterna 
mycket större än vad Du brukar kom¬ 
ma i kontakt med. Den största sum¬ 
man pengar i exemplet ovan är 
25.800.000 dollar. Jag kommer längre 
fram i texten tala om vilket av exemp¬ 
len som motsvarar beloppet. Hur myc¬ 
ket är 25 miljoner dollar? Om du skul¬ 
le använda pengarna att köpa bensin 
för, skulle Du kunna fylla en 15- 
gallon-tank (ca 57 1) varje dag i 3.802 
år. 

Tid 
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Hur många ”tick” 

Tidsåtgång om 


som går åt på en 

tiden är 

Verklig händelse 

1 MHz klocka 

1 tick = 1 sekund 

1 miljondels sekund 

1 

1 sekund 

1 sekund 

1.000.000 

278 timmar 

1 sextiondels sekund 

16.667 

eller 

11.5 dagar 

4.6 timmar 

En flugas vingslag (enl Isaac Asimov 
— se källfört) 

3.160 

53 minuter 

Addera 5 och 7 i maskinspråk 

LDA 5 

2 

2 

CLC 

2 

2 

A DC 7 

2 

2 

STA 251 

3 

3 

Totalt 

9 miljondels sekund 

9 sekunder 


fjärde och halv timma, skulle Du då 
anse Dig ha för tung arbetsbelastning? 
Svaret på detta är analogt med 
”interrupt”-(avbrotts-)rutinen som in¬ 
träffar 60 gånger per sekund i V1C 20 
och V1C 64. De 4,5 timmarna är tidsåt¬ 
gången för att ”köra” basprogrammet 
och halvtimmes rasten är ”interrupt”- 
rutinen. 

Hur lång lid tar det att köra ett 
program? Det beror på vad program¬ 
met gör. om man använder vår modifi¬ 
erade klocka, kan vi t ex beräkna en 
enkel addition med Basic. Additionen 
5 + 7 tar 0,5 miljondels sekund. Det är 
500 ”tickningar” med vår modifierade 
klocka eller 500 sekunder på vår ”upp¬ 
förstorade” klocka. Titta nu tillbaka 
på tabellen på maskinspråksprogram- 
met, de adderade också fem och sju, 
det tog bara nio sekunder. Genom att 
dividera 500 med nio, ser vi att ma- 
skinsspråksprogrammet var 50 gånger 
snabbare. Vid en tillbakablick på BA¬ 
SIC, tog det 500 sekunder så är åtta 
minuter av 11,5 dagar fortfarande gan¬ 
ska bra. Faktum är att vi kan addera 
fem och sju ungefär 2.000 gånger på en 
miljondels sekund. 

Nu har vi ödslat tillräckligt med tid 
på det här ämnet, så låt oss fortsätta. 
Ja, just det, angående frågan i början 
av texten. 

Om Du väljer alternativ 3, har Du 
fel. Det genomsnittliga avståndet till 
månen är 420.464.000 yard. En ”fem- 
centare” per yard blir sammanlagt 
21.023.200 dollar. 

Gissade Du på alternativ 2 hade Du 
också fel. Avståndet mellan New York 
och Los Angeles är 177.027.840 inch. 
En ”tio-centare” per inch blir sam¬ 
manlagt 17.702.784 dollar. 


Gissade Du på alternativ 1 hade Du 
rätt. Grattis! 

Dagen då jag satte ihop den här frå¬ 
geleken, var priset på guld 395 dollar 
per ounce. Två ton är 4.000 pounds 
( = 373 gram) eller 64.000 ounce. Vid 
395 dollar per ounce blir det samman¬ 
lagt 25.280.000 dollar. 

Storlek 

Vi ska nu vända vår uppmärksamhet 
mot storleken av 6502-”chipen”. De 
flesta människor har sett ett ”chip”- 
hölje förut (som somliga kalla ”Cater¬ 
pillar”). Den logiska slutsatsen av det¬ 
ta är att säga: ”Så det där är ett 6502- 
”chip”.” Nåja, det är inte helt rätt. 
Den svarta plast- eller keramiklådan 
med 28 kontakter (”ben”) är faktiskt 
en behållare för 6502-”chipen”. Själva 
chipet är en liten silverrektangel (en bil 
Silicon) på 3x4 mm. Ungefär samma 
storlek som den lilla grafiska lådan på 
framsidan av Din VIC:s tangenter. 
(Om Du äger en PET/CBM är dess 
storlek ungefär som curson (markö¬ 
ren) på bildskärmen.) 

Men i alla fall, en liten silverrektang¬ 
el gör inte att en microprocessor funge¬ 
rar. Det måste finnas någonting på 
den, förstår Du! Visst finns det det. 
Faktum är att det finns över 5.000 
”någonting” på den lilla rektangeln. 
Ett ”någonting” kallas i elektroniken 
för komponent. Den kan vara en tran¬ 
sistor, ett motstånd eller en förstärkare 
(det finns andra, men dessa är de vanli¬ 
gast förekommande). 

Nu ska vi titta på komponenter som 
är så små att 5.000 stycket får plats på 
en enda ”chip”. Om 6502-”chipei” är 
3x4 mm och vi delar det i 5.000 bitar. 



kommer varje bit att vara omkring 50 
micrometer i kvadrat. Det är en 50 mil¬ 
jondels meter. 

För att Du ska få en uppfattning om 
hur litet det är, ska vi jämföra det med 
storleken på ett sandkorn. Enligt Isaac 
Asimov är ett sandkorn omkring 200 
micromillimeter stort. Vi skulle kunna 
placera 16 stycken av våra komponen¬ 
ter på ytan av ett sådant sandkorn. För 
”landkrabbor” kan det jämföras med 
att storleken på ett nålsöga är cirka 
0,25 mm. (Enligt författaren: ”Jag har 
en något skev uppfattning om hur man 
mäter det.”) På den ytan får man plats 
med 100 komponenter. 

Om vi nu ville förstora storleken på 
en komponent till något mer fattnings- 
bart — en fotbollsplan till exempel. En 
fotbollsplan är ungefär 100 meter lång. 
Då skulle vi behöva förstora vår kom¬ 
ponent två miljoner gånger. Hur stort 
är det lilla silver-”chipet” nu? Ja, det 
är ungefär två miljoner gånger större 
eller en yta på 3,5x5 miles (en mi- 
le= 1.609 m). 

Vad är då storleken på höljet, eller 
”catepillaren”? Den är i normal fall 
cirka två inches lång och en halv inch 
bred. Men nu är den . . . 64,5 miles 
läng och 17 miles bred. Faktum är att 
om vi låter den stå på sina konlaker el¬ 
ler ”ben” skulle den vara tio miles 
hög. Analogt med detta, hur stor skul¬ 
le då VlC:en vara? 

Ytan skulle vara 512 miles, 236 miles 
djup och 74 miles hög. 

Trots att detta verkar vara fascine¬ 
rande, ska man hålla i minnet att 
6502:an inte är ett speciellt ”tätt” 
”chip”. Med andra ord, 5.000 kompo¬ 
nenter på ett ”chip” är inte speciellt 
mycket. Dagens banbrytande teknolo¬ 
gi, med 256.000 bitars minnes- 
”chips”, kan mer än en halv miljon 
komponenter finnas på ett enda 
”chip”. För att återigen referera till ett 
nålsöga, skulle man på den ytan kunna 
placera omkring 2.500 komponenter. 

Det här var alltså en liten resa med 
6502:an i tid och rum. Jag är väl med¬ 
veten om att den här sortens artiklar 
inte är späckade med fakta, men det 
kan göra detsamma. Det är nu hög tid 
att stanna upp och tänka efter vad Du 
egentligen arbetar med. Om Du förstår 
och uppskattar en dator, kan Du lära 
Dig använda den på rätt sätt. Använd 
den till fullo, på samma gång som Du 
lär Dig inse dess begränsningar. 
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5 REM ¥ LOTTO-KONTROLL * AV BIRGER GRAN 
10 BIMR < 40@•12•.LR<12> J=1 ; 1 = 1 
12 REABfl' RESTORE IFfl=99THEN90 
14 PRIHT‘TM'ILL DU MRTfi IN NVfl SPELFflLT? 

16 GETfl $• IFfl£=""THEN16 
28 IFfl$= "J"THEN95 

30 REfllt flcj, i> IFfl< ..T, I> =99THEN J -J-1 GOTQ40 

32 I Ffl1 , I > =0THENGOSUB35 

33 iFfl <T,I> >35THENf6 

34 I“l+i:GOTO 30 

35 1 = 1-1 • IFK FOR i > 1 1THEN96 

36 LR <. I > =LR < I > +• 1 

38 J=J+1:J=0.RETURN 

40 PR INT"11? 'B U HAR MflTflT IN fl" 

42 FOR I=?TQ1 1 IFLR < I > =0THEN46 

44 PRINTLRC I 1 • " SPELFRLT MEI' " ; I; " HUMMER" 

46 NENT 

50 PRINT"ÄJIflTfl HU IN RflTT LOTTORAB 

51 PRI HT" fl? ORDINARIE OCH 2 TI LLflGGSHUMMERW" 

52 FOR 1=1T09 

54 INPUTRT : V=VflL(RT > 

55 IFV C 10RV335THENPRIHT " FEL■ Tft OM S I STfl!"•G0T054 

56 R v I>=V : HENT S=0 

60 FORK= 1 TO J : R=0 : T=fl : FORL= 1 TO i 1 : FOR I = 1. T07 

62 I Ffl < K.. L > =R < I > THEHR=R+ 1 

64 NENT I : FORI =8T09 = IFfl< K, L > =R '■! I >THENT--T+1 

70 NENTI , L : IFS=0THENPR I NT"NITE.PELFflLT" , "ORD. RflTT" , "TILL. NR" 

74 PR IHTK , R , T : IFR34THEHPR IHT "¥■ * GRATULERAR ! * ¥" 

76 S=S+1 : IFS=10THEHS=0 INPUT"CTRVCK RETURN > "RE T 

70 nfntf fnb 

98 PR IHT" IMTATfl IH BINA SPELFflLT SOM DflTflSflTSER" 

91 PRIHT":n®ORJfl Pfl PHD 101." 

92 PR I NT" flflVSLUTfl VARJE SPELFflLT MED " , O- p]" 

94 PR I NT " 101 DflTfl " : PR I NT" 102 DATA" • PR I NT " 0. S. V. " EN Ii 

95 PRINT"*MATfl IN BINA NVfl SPELFflLT EFTER BESSA?fl" : G0T099 

96 °RIHT" WFEL INMATAT SPELFflLT NR " J 

99 FORT=1T02000 : NENT : L IST 100-9999 
10O00 BATA99 

REflBV. 
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Programmering för handikappade 
användare 

Robin Nixon framställer en önskan om att mjukvara 
skräddarys för individuella användarebehov. Inte förrän 
detta finns tillgängligt kan påståendet att micros ”hjälper 
de handikappade” rättfärdigas. 


Robin Nixon är dator-bibliotekarie på 
Seven Springs Cheshire Home, Tun- 
bridge Wells. 

På sista tiden har det skett en märkbar 
ökning av antalet mikrodatorer som 
används av handikappade. Trots att 
teknologin har varit tillgänglig länge, 
användes den inte fullt ut förrän pri¬ 
serna kom ner till användarnas nivå. 

Nu när marknaden översvämmas av 
mikrodatorer, har nya problem upp¬ 
stått. Det första gäller input- 
anordningar. På grund av handikap¬ 
pens olika slag finns det ingen hårdva¬ 
ra som kan massproduceras billigt. 
Varje individ behöver indivuellt utfor¬ 
mad utrustning. Det är inte ett så stort 
problem förrän man börjar skriva 
mjukvaran och då upptäcker alla möj¬ 
ligheter till input som programmet 
måste ta med i beräkningarna. 

Det andra problemet är output. 
Många handikappade personer har 
synsvårigheter, så en TV-ruta är inte 
alltid bästa lösningen. Syntetiskt tal 
går framåt med stormsteg, men är 
fortfarande svårt att använda — speci¬ 
ellt för en blind person. Och tänk på de 
människor som är både blinda och dö¬ 
va! På grund av att alla dessa problem 
måste lösas individuellt finns det en 
markerad brist på mjukvara som är 
skriven speciellt för de handikappade. 

Att skriva program för handikappa¬ 
de kan vara både mycket utmanande 
och också mycket tacksamt. När man 
ser någon som aldrig har kunnat skriva 
ett brev eller spela ett spel utan att lita 
till hjälp från någon annan, när du ser 
denna person använda din mjukvara 
och sålunda bli mer oberoende, då vet 
du att du har skapat något värdefullt. 
Trots att en översikt av hur man skri¬ 
ver för handikappade är till hjälp, 
finns det ingen verklig ersättning för 
att faktiskt besöka ett hem eller en sko¬ 


la och lära känna de inblandade män¬ 
niskorna. Detta inkluderar personalen 
eftersom de har en större insikt än nå¬ 
gon annan, undantaget den person det 
verkligen gäller, i förmågan hos varje 
person. Dessa är de människor som 
kommer att tala om exakt vad som be¬ 
hövs och ge goda råd om hur man skall 
gå tillväga. 

De mest använda input- 
anordningarna är baserade på ett scan- 
system som normalt använder en eller 
två knappar. Vid användande av en 
knapp rör sig en cursor horisontalt 
längs med en alfanumerisk matris — se 
figur 1. För att skriva bokstaven y 
trycks första knappen ner och hålls 
nertryckt tills cursorn har flyttat sig till 
bak dvs ”backspace” — se figur 2. 
När man släpper knappen avläser cur¬ 
sorn neråt. När den valda bokstaven 
lyses upp av cursorn trycks knappen 
ner igen och bokstaven läses då in i da¬ 
torn — se figur 3. 

Tvåknapps-moden är liknande med 
undantag för att den första knappen 
används för horisontell avläsning och 
den andra för vertikal avläsning. När 
den första knappen trycks ner en gång 
till läses bokstaven in. Matrisen kan er¬ 
sättas när som helst av en kommate- 
ringspanel, en sifferpanel eller en ord- 
eller fraspanel. 

Det kan tyckas vara en mycket lång¬ 
sam metod, men många handikappade 
användare har så begränsad rörelseför¬ 
måga att ett sådant här system är det 
bästa tills talregistreringsteknologin 
når en mycket högre standard. Natur¬ 
ligtvis kommer många människor att 
kunna använda fler än två knappar, 
inläsningshastigheten ökar för varje 
knapp. 


Metoderna för input är praktiskt ta¬ 
get obegränsade; mycken tankeverk¬ 
samhet måste läggas ner på urval och 
utveckling av input för varje individu¬ 
ell användare. Frånsett de två mest 
vanliga outputs, video och skrivare, 
finns det mycket få andra som är lätta 
att använda. Syntetiskt tal är kanske 
den mest använda av de andra alterna¬ 
tiven. Talet är förståeligt och kommer 
att bli mycket bättre eftersom mycket 
arbete läggs ner på detta område. Så 
småningom kommer maskinvaran 
också bli billigare och lättare att an¬ 
vända. 

Många handikappade användare 
har någon form av ögonspänningar el¬ 
ler andra synrubbningar. Så om en vi¬ 
suell display väljs måste den vara ex¬ 
ceptionellt tydlig och så stor som möj¬ 
ligt. Ett sätt att göra video output tyd¬ 
ligare är att använda två skärmar. Den 
första kunde innehålla bokstavsmatris 
och annan relevant information, t.ex. 
det sista ordet eller sista meningen som 
skrevs in. Storleken på bokstäverna på 
displayen skulle då kunna vara så stora 
som användaren behöver, och ändå, 
förhoppningsvis, lämna tillräckligt 
mycket utrymme på huvudskärmen för 
att köra programmet. 

Den output som du tycker är bäst 
kan vara mycket förvånande. Jag kän¬ 
ner en ung man som har extremt dålig 
syn och knappast någon hörsel. Han 
har en handburen summer, från vilken 
han känner vibrationerna från en 
morse-kod som datorn översätter frän 
text som lagrats i dess minne. Han är 
en hängiven fotbollsanhängare och 
tycker om att följa resultaten. I stället 
för att stava dem för honom med fin¬ 
gerspråket i hans hand, så är det myc- 






ket lättare att skriva in dem på datorn 
och låta honom gå över dem i sin egen 
takt. 

Vilket program du än skriver är det 
väsentligt att komma ihåg att de flesta 
användarna är mycket oerfarna vad 
det gäller användande av datorer. En 
Hjälp-meny måste alltid finnas till¬ 
gänglig. Programmet måste också vara 
intressant och inte för komplicerat. En 
innehållsrik handbok är ett plus efter¬ 
som många handikappade användare 
måste lita till outbildad assistans. 

Spelprogram kan vara mycket an¬ 
vändbara i en miljö där det helt natur¬ 
ligt finns mycket fritid. De mest popu¬ 
lära spelen är Scrabble (Alfapet), Mo¬ 
nopol, Otello, Schack och Dam (eller 
Bräde). Snabba spel som t.ex. Space 
Invaders och Pacman skulle vara spe¬ 
ciellt välkomna om en enkel input- 
metod kunde tas fram och spelhastig¬ 
heten kunde varieras med hänsyn till 
dem med långsam reaktionsförmåga. 

Trots att det finns många kommuni¬ 
kationsprogram är de flesta baserade 


på samma avläsningssystem. Ett möj¬ 
ligt alternativ är att utveckla ett språk 
baserat på tankar och symboler, vilka 
var och en matas in i datorn och kom¬ 
binationen översattes till svenska. 

Bra program för att rita bilder och 
kurvor för matematiska funktioner är 
det ont om. Ett program som jag ännu 
inte har sett är en rutin för att tillåta 
användaren att läsa in och köra Basic 
program — inte så lätt som det låter. 

Jag har med avsikt inte varit utförlig 
i min beskrivning av den programvara 
som nu finns tillgänglig. Det finns en 
god möjlighet att du, om du får tänka 
helt fritt, kan komma fram till helt nya 
tänkesätt vad gäller utförande av pro¬ 
gram för handikappade. Men om du 
behöver hjälp, skriv till författaren vid 
Seven Springs Cheshire Home, Penbu- 
ry Road, Tunbridge Wells, Kent TN2 
4NB där det finns ett nationellt pro¬ 
grambibliotek för handikappade. Vi 
vill att dina program delas av så många 
människor som möjligt. 



ÄVENTYR PA 


VIC- 



20/64 


Kallsvettig och med skräcken i halsen, 
smyger du omkring längs kalla och 
fuktiga källargångar, på jakt efter den 
försvunna skatten. Du vet att ingen 
som försökt sig på bedriften att ta den 
tillbaka till civilationen har återvänt 
med livet i behåll. 

Du ser lampan flimra till och vet att 
det är slut med dej om du inte lyckas 
hitta ingången till den hemliga grottan 
innan dina batterier är slut. Och plöts¬ 
ligt blir allt kolsvart, du känner kalla 
svettdroppar rinna efter nacken och 
paniken som kramar magen. 

Du slår förtvivlat på lampan för att 
få liv i den igen, men den är död. Du 
rusar iväg i mörkret för att finna en 
plats att gömma dej på, så länge lam¬ 
pan lös så höll du monstren borta men 
nu kan allt hända. 

Du snubblar till och faller raklång 
på stengolvet, kvickt vänder du om för 


att se vad du snubblat på, då hör du de 
hasande stegen bakom dej. Du rycker 
till och får tag i ett järnföremål, EN 
NYCKEL, ropar du till. Det är den! 
Nyckeln till grottan. 1 din lyckoberus- 
ning står du kvar för länge . . . 

Vad är nu detta? och har detta med 
datorer att göra? 

Jo, detta var en liten snutt ur ett 
ADVENTURESPEL. Många vet re¬ 
dan vad det innebär, men för dej som 
inte vet det, och för dej som vet men 
inte hur du själv kan göra dom, hand¬ 
lar den här artikelserien. 

Den är menad att rikta sig till alla 
som i första hand har en V1C-20, och 
som är nybörjare. Men som sagt, att 
göra ett ADVENTURESPEL har sina 
sidor, så du som redan kan mycket 
kanske inte vet hur man gör ett sådant 
här spel. 

Här hade jag tänkt att på ett enkelt 
sätt visa hur det kan gå till. 

Att spela ett bra Adventurespel är 
(tycker iallafall jag) otroligt fängslan¬ 
de, dels därför att man blir bara mer 
och mer sporrad att ta reda på lösning¬ 
en. Det hör nu inte till den enklaste sak 
att lyckas med det inte, det kan i vissa 
spel ta upp till flera månader. Del är 
som att vara detektiv, allt får du lista 
ut själv tillsammans med ”Din man på 
plats”. 
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Det enda du oftast får reda på när 
du börjar spela är att någon i spelet 
frågar dej . . . 

— VAD SKA JAG GÖRA NU? 

Sedan är det upp till dej att tala om 
vad som skall göras, och då har du 
som ända hjälp din egen fantasi samt 
de tillgångar spelet bjuder, i form av 
kommentarer ifrån ”Din utsände”. 
Vad han ser, hör och var han är. 

Spelet bygger nästan bara på sträng¬ 
behandling. Här hjälper ingen kun¬ 
skap i supersnabba reaktioner med din 
väloljade joystick inte. Nej, bara din 
tankeverksamhet är väloljad så räcker 
det spelet igenom. 

Hur som helst. Datorn förväntar sig 
alltså en mening ifrån dej, som t.ex. — 
TA LAMPAN, eller LÄS LAPPEN. 
När den fått en mening så behandlar 
datorn den på följande sätt. Först tar 
den reda på om det är ett eller två ord 
du skrivit, och det gör den genom att 
skilja orden åt vid mellanslaget. LÄS 
blir ORD 1 och LAPPEN blir ORD 2. 
Finns inget mellanslag blir allt du skrev 
ORD 1. 

Det först ordet du skriver måste näs¬ 
tan alltid vara ett VERB, t.ex. TA, 
GÅ, ÖPPNA, SKJUT osv. Det andra 
ordet är antingen ett OBJEKT eller en 
riktning. Det vanligaste är att Adven- 
tures bara förstår två ord. Det går na¬ 
turligtvis att få det att förstå hur mån¬ 
ga som helst, men det medför en desto 
krångligare programering, och längre. 
Jag kommer att till en början iallafall 
nöja mej med två. 

Just den biten ser ut så här. 

10 INPUT INS 

20 FOR 1 = 1 TO LEN(INS) 

30 IF MIDS(INS,1,1) = ” ” THEN 50 
40 NEXT: 01S= INS: GOTO 70 
50 01S = LEFTS(lNS.l-l) 

60 02S= RIGHTS(INS,LEN(INS)-1) 
70 PR1NT01S: PRINT02S 
80 GOTO 10 

Prova så får du se. Men mera om 
programering och förklaringar till den 
kommer senare. 

Men nu för att överhuvud taget kun¬ 
na göra ett eget ADVENTURE eller 
ÄVENTYRSSPEL som det heter på 
Svenska, så krävs det en historia eller 
ett mysterium kring vilket spelet ska 
kretsa och gå ut på. Och till nästa gång 
tänkte jag inte sätta dej vid datorn och 
knappa, utan vid skrivbänken. Och 
sätta dom grå på prov, du ska nämli¬ 
gen skriva en sådan historia. Den kan 
handla om vad som helst, bara den har 
ett antal bestämda platser eller rum 


som du kan gå till, samt innehålla di¬ 
verse prylar vilka ska bidra till myste¬ 
riets lösning. 

Det behöver nu till en början inte be¬ 
tyda att du skenar iväg till något hund- 
rafemtirumsslott med lika många gån¬ 
gar, vrår och prår, häxor, tomtar och 
elaka monster i drösar, utan jag tycker 
att du kan vara nöjd om du får ihop 
mellan 5 och 10 olika platser, och kan¬ 
ske lika många saker. 

Det är ganska mycket att tänka på 
redan här, och jag tänkte visa dej hur 
jag brukar gå tillväga. 

Rita en karta över platsen för skåde¬ 
spelet, gör en liten lista över de olika 
platserna samt sakerna. Den kan se ut 
t.ex. så här. 


Rumbeskrivning 

1 Trapphus 

2 Entré 

3 Sovrum 

4 Hall 

5 Allrum 

6 Vilorum 

7 Kontor 


Här finns . . . 

1 En trappa 

2 En dörr 

3 En lapp 

4 En nyckel 

5 En dåligt gömd dörr 

6 En nyckelknippa 


Allt det här kan självklart bytas ut 
mot sträckbänkar, piskor och dylika 
tingestar för dom som nu önskar det. 
Men vad det nu än vara må, så är prin¬ 


cipen alltid den samma. 

Vidare så är det lämpligast att du går 
i väderstreckens riktningar, alltså 
nord, syd, väst och öst. Därför att GÅ 
BAKÅT eller GÅ HÖGER, blir bara 
bökigt. Det allra enklaste är också om 
man kortar ner alla riktningar man ska 
kunna gå åt, till bara en bokstav. Så 
ska du t.ex. här ovan från rum 5 till 
rum 6, så skriver du bara Ö. Sedan kan 
du även skriva ner alla kommentarer 
du vill ska förekomma i ditt spel, t.ex. 

Datorn frågar. 

— VAD SKA JAG GÖRA NU? 

Du svarar. 

— TA NYCKELN. 

Datorn säger. 

— DET FINNS INGEN HÄR! 

Osv. Detta för att du ska få en så 
överskådlig bild av spelet som möjligt, 
innan du börjar göra program av det. 

Det låter kanske både mycket och 
kanske krångligt, men när du kommit 
igång så flyter det både lätt och oftast 
alldeles för långt. Tänk bara som en 
dator när du skriver, INMATNING, 
BEARBETNING och UTSKRIFT. 
Men du måste ha med dessa kommen¬ 
tarer ifrån ”din man på plats”, därför 
att du dels måste vara i samma rum 
som de saker du vill ta, eller dörrar du 
vill öppna. Och du kan bara gå i de 
riktningar som rummen eller platserna 
tillåter. 

Och grötar det ihop sig för dej så får 
du mera hjälp i kommande nummer. 

Jag hoppas att jag förklarat mej på 
ett förståeligt sätt och att det låter in¬ 
tressant. Så vässa pennorna och spar 
oljan till cellerna, så kommer du nog 
alltid på något. 

Lycka till, till nästa gång! 

Börje Törnby 
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JELLY MONSTERS VIC-1905 PANIC 64 (Interceptor) 


1 . 

1 631 860 

Pelle Gustavsson, SUNDBYBERG 

1 . 

5 300 

Torbjörn Almén, SJÖBO 

2. 

763 650 

Peter Johansson, LYCKEBY 

2. 

4 200 

Charlie Johansson, HANDEN 

3. 

705 980 

Anders Hellman, NOL 

3. 

2 100 

Dr Darnio 



RAT RACE VIC-1909 


GRIDRUNNER (LLamasoft) 

1 . 

83 312 

Per Bergström, VÄSTERVIK 

1 . 

94 180 

Niklas Lindberg, VÄSTERVIK 

2. 

82 180 

Magnus Eriksson, LJUNGBY 

2. 

58 610 

Stuffe 

3. 

70 200 

Leif Lindström, ÖREBRO 

3. 

9 810 

Maria Weijdling, PERS GÄRDE 


SUPERLANDER VIC-1907 



JUMPMAN (EPYX) 

1 . 

88 000 

Fredrik Gustafzon, GNESTA 

1 . 

27 400 

J. Aspengren, LINDOME 

2. 

86 000 

Thomas Johansson, YSTAD 

2. 

17 400 

Johan Bergqvist, TROLLHÄTTAN 

3. 

77 700 

Tomas Lundh, SKÖVDE 

3. 

15 800 

Joakim Ramsberg, MÖLNDAL 


SPELREKORD 

På grund av omorganisation av redaktionen har inte 
”SPELREKORD” kommit igång ordentligt. Därför är 
det ingen större förändring från det förra numret. 
Flickor! 

Skicka in fler rekord så startar snart en tjejliga. 

Vänliga Hälsningar 

SPELREDAKTÖRN 

C.E.J. 


Datum 

Namn. 

Adress. 

Postnr, Postadress. 

Spel. 

Erhållna poäng. 

Intygas av målsman eller annan myndig person 
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VIC20 

VÄXLINGSBART 

16 KRAM 

• I matchande plastlåda 

• Kan växlas mellan 3,8,16K 

• Senaste CMOS-teknologin 

• 6 månaders garanti 

• Hög DOWNSWAY kvalité 

Begär katalog över hela vårt 
VIC 20/64 sortiment. 

Pris inkl. moms. Porto tillkommer. 

ÅTERFÖRSÄLJARE 

SÖKES! 

ARNSVIK-DATA 

Box 19017 • 250 19 Helsingborg 
Telefon 042-922 29 


600 

program till 

VIC-64 

och 

VIC-20 

Datorer och tillbehör! 
Katalog 92 sidor 15 kr. 



DATAMÄKLAREN 


Vasavägen 61 C, Linköping 
Tel. 013-10 31 74 


Yatzy till Commodore 64 

Här bifogas en listning till ett Yatzy. Jag har sett att det 
säljs programkasetter för dyra pengar med Yatzy-spel. 
Men jag tycker att man bör kunna trycka in det själv på 
sin dator. 

Beskrivning av programmet: 


Rad 20—30: skapar en ’ner-sträng’ 
resp en ’space-sträng’ för enkel skärm- 
hantering. 

Rad 40—70: namnger de olika num¬ 
mer-valen. 

Rad 72—78: förbereder ljudregistret. 
Rad 79: anropar subrutin på raderna 
3000—3040 som ger en fanfar, när spe¬ 
let startar. Den anropas även när nå¬ 
gon spelare får Yatzy eller uppnår bo- 
nuspoäng. 

Rad 80—90: startar upp aktuell spel¬ 
omgång. 

Rad 100: här börjar huvudloopen för 
själva spelet. 

Rad 140—150: ritar ut 5 'tomma tär¬ 
ningar’. För de vertikala strecken an¬ 
vänds Commodore +M, då det 
vänstra strecket annars raderas när 
siffran skrivs ut i tärningen. 

Rad 160: 'Slår' tärningarna, och låter 
siffrorna 'snurra' inne i de fem tär¬ 
ningarna. 

Rad 170: anropar subrutin 1000, som 
kollar om slaget blivit 'Yatzy' därefter 
skrivs kvarvarande kombinationer ut. 
(Rad 170—185). 

Rad 190: anropar subrutin på rad 
1100, som raderar 3 hela rader. 

Rad 190—210: möjliggör val av antal 
tärningar som slås om. Här liksom i 
alla följande inmatningar sker dessa 
med strängar, som sedan omvandlas 
till tal. Detta för att slippa att pro¬ 
grammet bryts av ett 'Error redo from 
start’ vid feltryckning. 

Rad 220—270: kollar vilka tärningar 
som ska slås om, och gör detta. Sedan 
görs en ny kontroll om 'Yatzy' inträf¬ 
fat. Flaggan 'K' avläses, för att avgöra 
om ytterligare ett omslag får göras. Är 
K = 1 hopp till 300, annars återgång till 
190 för ytterligare ett omslag. 

Rad 300: summerar tärningarna som 
hjälp för de kombinationer där hela 
summan får användas. 

Rad 310—330: val av kombination för 
att spara slaget, koll om den kombina¬ 
tionen redan tagits, i så fall återgång 
för nytt val. 


Rad 340—345: inmatning av aktuell 
poäng. Kontroll att denna ej överstiger 
tärningarnas summa (annat än vid 
'Yatzy'). 1 sådant fall utskrift av en 
mild förmaning. 

Rad 350—360: summering av de kom¬ 
binationer som avgör rätt till bonus. 
Om bonusnivå uppnåtts anropas sub¬ 
rutin på rad 2000 som automatiskt läg¬ 
ger till bonuspoängen, avger en fanfar 
och hissar 'bonusflaggan' ,BO(J), som 
markerar att aktuell spelare tillgodo¬ 
räknats bonus. 

Rad 370: nästa spelare, nästa varv. 

Rad 400—430: summerar resterande 
kombinationer, kollar av vilken spela¬ 
re som uppnått högsta poängen, och 
skriver ut deltagarlistan med angivan¬ 
de av varje spelares poängsumma och 
en speciell markering av vinnaren. 

Rad 440—460: ger möjlighet att börja 
om för en ny omgång. 

Rad 1000—1020: subrutin för koll om 
man slagit 'Yatzy'. 1 sådant fall anro¬ 
pas subrutin på: 

Rad 1200—1220: som blinkar med 
skärmen, skriver ut 'Yatzy' och däref¬ 
ter anropas fanfaren i subrutin 3000— 
3040. 

Programmet är skrivet kompakt för 
att lättare kunna publiceras, men jag 
hoppas att dessa förklaringar underlät¬ 
tar att följa det. 

Programmet är ju relativt enkelt och 
borde gå att köra även på VIC 20, om 
'ner-strängarna' och 'space-strängen' 
anpassas till VIC 20:s radlängd och 
radantal, och om uttabuleringen av de 
fem tärningarna (rad 140—160 och 
250) görs så tätt som möjligt. Givetvis 
måste även ljudkommandona göras 
om (rad 72—78 och 3000—3040). 
Poke-kommendona på rad 10 sätter 
skärm och ram-färg och ersätts med 
motsvarande för VIC 20. 

Med detta tillönskas alla 'Yatzy- 
fans’ mycket nöje! 

BIR 
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5 REM +: VfiTZV * FÖR COMMODORE 64 AV BIRGER GRAM 
1@ POKE53280,5 = P0KE53281,0-PRINT"3" DIMKT<15>,K<18,15),HET<24> 

20 HET<0) = "3" FORI = 1T024 HET<I>=HET<1-1> + "W":HEKT : TT=" 

30 FORI = 1TO39 -SPT=SPT+" ":HEKT■FORI=1TO14 3TT=STT+"* " =HEKT 
40 KT<1)=" ETTOR"+TT : KT <2) = " TVÅOR"+TT : KT< 3> = " TREOR"+TT 
50 KT <5 > = " FEMMOR"+TT KT <6) = " SEKOR"+TT : KT <7>=" ETT PAR"+TT 
60 KT<9 > = " 3-TAL"+TT KT<10)="4-TAL"+TT : KT<11>="LITEH STEGE" 

65 KT<4>=" FVROR"+TT : KT<8> = " 2 PAR"+TT : KT<12> = "STOR STEGE" 

70 KT< 13) = "KAK "+TT KT< 14> = "CHAHS"+TT : KT< 15> = " VATZV+TT 
72 BE=54272=F0RCL=EET0BE+24'POKECL,O=HEKT 
74 POKEBE+5,85 = POKEBE+6,85= POKEBE+12,85 = POKEBE+13, 85 
7 6 DAT A 25.. 30 , 18 .■ 289 .'33/135.. 25 , 30,42,62,31 , 165.. 50 

78 DATA 60,37,162,42,62,31,165,50,60,37,162 

79 GOSUB3000 

80 PRINT"^H"SPC<ll)"fc^ * V ATZ V * * HBCT' : PRIHT"HUR MANGA SPELARE"; 

90 IHPIJTM = FORJ= 1 TOM = SU< J> =0: BO< J >=0: FORK= 1 TO 15 ' K< J, K>=0 = HEKTK, J= MK=0 
100 FORG= 1 TO 15: FORJ= 1 TOM 

110 PRIHT"riW"SPC< 11 >"k.* * V A T Z V * *■" = PRINTHET<7); »SPELARE ";j,"l"; 

120 PRIHT" TRVCK <SPACE>!k" 

130 GETAT : IFATO" "THEH130 

140 PR INTHET < 7 >; SPT : FORT® 1T05 = PR I HT HET < 3 > SPC < 6*T > " I-1" 

150 PRIHTSPC<6*T>" I I" = PRIHTSPC<6*T> " I_I" ■ HEKT 

160 FORT® 1T05 : FORS® 1T028 = K®INT< RHD< 1)*6> +1 = PRINTHET-<4 >SPC <6#T+1 >K: HEKT 

170 T<T> =K •' HEKT : SU=0 = K=0 GOSUB1000 : PRINTHET<7> " »SPELARE "; J, "5DU HAR KVAR : " 

1SO FORK®1TO15:1FK<J,K>=0THENPRIHTK,KT < K >, 

185 HEKT 

190 GOSUB1100■PRIHT"IHUR MANGA TARNIHGAR VILL DU SLA OM" 

200 OMT®"": IHPUT"< 0-5)",OMT=IFOMT=""OR < VAL <OMT>)>5THENG0SUB1100:GOTO200 
210 OM®VAL <OMT):IFOM=0THEH300 
220 F0RQ=1TQQM 

230 IJT="" : IHPUT"VILKA TARNIHGAR" ; UT 

235 IF < VAL< UT> > =0OR< VAL < UT> > >5THENG0SUB1100:GOTO230 

240 U < O)=VAL<UT>=PRIHT" 1"; :HEKT:PRI HT' V 

250 FORO® 1TOOM = FORS® 1TO20 : K® IHT <RHD< 1 >*6 > +1 : PRINTHET < 4 )SPC<U<O )#6+1 >K 
260 HEKTS:T < U < O >>=K:HEKTO:GOSUB1000•IFK=1THEH300 
270 K®1 =GOTO190 

300 FORZ®1T05 : SU=SU+T<Z> : HEKT : GOSUB1100 PRINT"ITTARHINGARNAS SUMMA : ";SU 
310 PRI HT "HUR VILL DU SPARA SLAGET <CHR>" J : LT="" 

320 INPIJTLT L=VAL<LT> : IFL=0ORL> 15THENG0SUB1100:G0T0310 

330 IFK < -J, L )O0THEHGOSUB1100: PRIHT" REDAN TAGET " G0T0310 

340 PT="" : PRIHT"VILKEN POANG"; : IHPUTPT IFFT=""THENPRINT"T‘;:GOTO340 

345 IFVA-C5ANDVAL<PT>>SUTHENGOSUB1100:PRIHT"AJA BAJA! INTE FUSKA!"=GOTO340 

350 K<J,L)=VAL<PT> = IFL<7THENSU<J)®SU<J)+K<J,L) 

360 IFEO < J>=0AHDSU < J >>63THENGOSUB2000 
370 HEKTJ,G 

400 FOR T® 1 TOM : F0RL=7TÖ15 : SIK J> =SU< J> +K< J, L> •’ NEKTL : IFSLK J»MKTHEHMK=SLK-J) 

410 SP=J : HEKT-J : GOSUB 1100 : PRIHTNET<7>SPT : PRI HT "RESULTAT " 

420 FOR J= 1 TOM : I FJ=SPTHEHPR I HT " »v 1 1 HHARE = ■"; 

430 PRIHT"SPELARE HR ";J,",POÄNG:";SU< J):HEKT 
440 F'RINTHET<20>"EN OMGAHG TILL? TRVCK <*>" 

450 GETAT : IFATO"*"THEH450 
460 GOT079 

1000 VA=1 : F0RI=1T04 : IFT<1>=T<1+1>THEHVA=VA+1 

1010 HEKT IFVA=5THEHG0SUB1100:GOSUB1200 GOSUB3000 : FORT®1TO2000:HEKT 
1020 RETIJRH 

1100 PRINTHET<17>;SPT:PRIHTSPT PRINTSPT : PRIHT"TTT i ■RETURH 

1200 FORF®1T03:P0KE53281,1=FORV®1T099:HEKT P0KE53281,0:FORV®1T099 

1210 HEKTV,F : PRIHTSPC<4>"H";STT : PRIHTSPC<4)"* * VATZV! GRATULERAR! * *" 

1220 PRIHTSPC< 4>STT,"3":RETURH 
2000 SU<J >=SU < J >+50:BO< J > = 1:GOSUB1100 

2010 PR I HTSPC < 4 > " W ; STT : PR INTSPC < 4 > " * # # BO H US! * $ *" 

2020 PRIHTSPC <4 >STT;“ 1" ■GOSUB3000:FORT®1TO1000:HEKT■RETURH 

3000 POKEBE+24,15:POKEBE+4,33:POKEEE+11,17 = FÖRKV®1 TO6 

3010 READH1,L1,H2,L2 = POKEBE+1,Hl=POKEBE,L1 POKEBE+8,H2 = POKEBE+7,L2 

3020 IFH1=50THENFORT=1 TO150 = HEKT 

3030 FORT®1T075 = NEKTT,KV 

3040 POKEBE+4,32 = POKEBE+11,16 POKEBE+24,0 = RESTORE = RETURH 
READV. 
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Om FORTH 

— Ett annorlunda språk 


av Ola Johansson 

Som du säkert vet finns det flera språk än BASIC till 
VIC-datorerna. Man har till exempel kunnat läsa om 
språket COMAL här i VIC-rapport. Ett annat språk som 
är intressant är FORTH. Det är ett strukturerat språk, 
som betyder att man skriver programmet i överskådliga 
delar som tillsammans löser det problem man har. Det 
skiljer sig mycket från BASIC men för en datorintresse¬ 
rad är det alltid kul att lära sig något nytt! 


Varför ska man då lära sig ett nytt 
språk? Räcker det inte med BASIC? I 
vissa fall kan det göra det, men ibland 
kan man behöva ett nytt verktyg till si¬ 
na uppgifter. Det är ju som ett verktyg 
man använder programmeringssprå¬ 
ket, och som sådant kan det ha både 
för- och nackdelar. En av de nackdelar 
som BASIC har men inte FORTH är 
att det är svårt att skriva sitt program 
strukturerat (se inledningen). I 
FORTH är man ”tvungen” att göra 
detta och om man skriver ett stort 
program är det nödvändigt om man 
vill kunna förbättra programmet sena¬ 
re (många har väl sett ett s k ”spagetti¬ 
program” med så många GOTO och 
GOSUB att man blir alldeles snurrig?) 

En historisk tillbakablick 

Efter ovanstående lilla beskrivning av 
en del skillnader mellan BASIC och 
FORTH är det dags att reda ut vad 
FORTH egentligen är och hur man 
programmerar i detta förträffliga 
språk. Själva idén till FORTH dök upp 
i huvudet hos en programmerare vid 
namn Charles H. Moore i början av 
1970-talet. Han hade tidigare försökt 
förbättra de metoder han använde som 
programmerare, men under åren 
1968—70 började språket FORTH ta 
form. Första gången FORTH använ¬ 
des i ”verkliga livet” var 1971, då del 
användes i ett astronomiskt observato- 
rium i USA. Under användandet på 


observatoriet utvecklades det ytterliga¬ 
re och 1973 bildades Forth Inc. av någ¬ 
ra entusiaster. Bland dem fanns förstås 
Charles Moore. 1976 kom en version 
som kallades microFORTH och sam¬ 
ma år bildades i Europa gruppen 
EFUG (European FORTH Users 
Group). Några år senare bildades FIG 
(FORTH Interest Group), som har bi¬ 
dragit till den variant av FORTH som 
VIC-arnas FORTH bygger på: 
FORTH-79. Detta är en standardver¬ 
sion som har skapats för att inte 
FORTH ska råka ut för samma missö¬ 
de som BASIC, nämligen det att det 
finns minst lika många olika BASIC- 
dialekter som det finns BASIC- 
datorer. 


Vad kännetecknar 
FORTH? 

FORTH skiljer sig mycket från andra 
språk. För det första består språket av 
en hel massa ord (ungefär som kom¬ 
mandon eller funktioner) ordnade i en 
sk ordlista, som man själv bygger ut 
under progrmmeringens gång, och för 
det andra så utförs alla beräkningar på 
en stack, som förklaras närmare i näs¬ 
ta stycke. Dessutom är FORTH inter¬ 
aktivt, vilket betyder att det hela tiden 
”händer” något när man arbetar med 
datorn. Du kan ju t ex jämföra med 
BASIC-ens kommandon LIST och 
RUN. I FORTH fungerar alla ord som 


en sorts kommandon. När du pro¬ 
grammerar i FORTH skriver du olika 
definitioner (förklaringar hur något 
ska utföras) av ord, som du sedan kan 
kombinera till andra ord till du har ett 
eller ett fåtal ord som gör hela jobbet. 
De ord du själv skriver hamnar den 
ordlista som FORTH består av (se 
ovan). För att göra en försiktig jämfö¬ 
relse med BASIC igen (vilket är svårt, 
eftersom de har så lite gemensamt) så 
liknar det sättet med vilket du skriver 
program uppdelat i små subrutiner, 
programdelar, som gör varsin del av 
jobbet. 

Stacken 

Stacken är det ställe där alla tal som 
behövs i olika beräkningar hamnar. 
Där läggs också resultaten av beräk¬ 
ningarna, samt de tal som en funktion 
kan tänkas ge ifrån sig. Stacken funge¬ 
rar enligt något som kallas postfixnota- 
tion, omvänd polsk notation eller RPN 
(kärt barn har många namn). De som 
känner till hur Hewlett-Packards mini¬ 
räknare fungerar vet vad jag menar. 
Stacken kan tänkas fungera som en 
hög (”stack” på engelska) av tal, ur 
vilken man bara kan plocka det över¬ 
sta. Dessutom måste alla tal som man 
vill räkna med finnas på stacken innan 
man utför beräkningen. Det ger som 
följd att man räknar ”baklänges” i 
FORTH, alltså att man först skriver de 
tal man t ex vill lägga ihop och sedan 
skriver H—tecknet. Detta kan bäst be¬ 
skrivas men några exempel, som finns 
senare i artikeln. Det kan kanske verka 
avigt i början, men efter en tid kan 
man inte klara sig utan stacken och 
RPN. För datorprogrammering är det 
dessutom utmärkt, eftersom (nästan) 
alla datorer räknar med en stack in¬ 
ternt. Det gör t ex alla datorer som 
bygger på 6502-processorn och det gör 
bl a VIC-datorerna. 
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Finns nackdelar hos 
FORTH? 

Javisst, det vore fel att säga annat. 
ALLA språk har fler eller färre nack¬ 
delar, även om en del påstår annat. En 
nackdel som man lägger märke till hos 
FORTH är att det inte finns decimal¬ 
tal, FORTH räknar bara med heltal. 
För en del kan detta verka vara en all¬ 
varlig brist, men ofta klarar man sig 
med heltal, och om man inte gör det 
kan man faktiskt fixa det själv, med en 
smula programmering. I en del versio¬ 
ner av FORTH finns det t om inbyggt 
från början, dock inte i VIC-arnas 
FORTH. En annan nackdel, som 
främst är ekonomisk, är att man näs¬ 
tan måste ha en diskdrive, eller di¬ 
skettstation som det också kallas, som 
är mycket dyr (3 495:— till VIC-arna 
enl prislistan 83-08-15) jämfört med en 
bandspelare. Nu går det faktiskt att 
använda bandspelare också, men det 
blir då ganska trögjobbat och inte det 
nöje som det borde vara. 

En annan sak som BASIC- använda¬ 
re kan tänkas sakna är GOTO- 
instruktionen, som tillåter att man 
hoppar lite hur som helst i ett prog¬ 
ram. Denna instruktion kan dock upp¬ 
muntra till röriga program som är svå¬ 
ra att tyda, så saknaden bör bli kort. 
När vi är inne på ”GOTO- frågan” vill 
jag citera Leo Brodie som i sin bok 
”Starting FORTH” skriver: ”By the 
end of this book you’11 be telling your 
GOTO where to GOTO.” Jag undrar 
vart . . .? 

Smakprov 

Nu kan det vara dags för några smak¬ 
prov på hur det kan se ut när man an¬ 
vänder FORTH. Exemplen är så gott 
som självförklarande, det som du eller 
jag skriver har jag strukit under. Efter 
detta kommer datorns svar. Varje 
gång datorn har utfört sin uppgift skri¬ 
ver den OK, för att tala om att den är 
klar för en ny uppgift. 

3 5 + . 8 OK (Punkten tar översta ta¬ 
let från stacken, resulta¬ 
tet, och skriver ut det på 
skärmen.) 

3 5—, —2 OK 

.”FOO BAR” FOO BAR OK 
(ordet.” skriver ut text på skärmen.) 


Nedan finns en lite mer avancerad 
beräkning, därför visar jag till höger 
om exemplet hur stacken ser ut efter 
varje rad. Det ”översta” talet i stacken 
ligger längst till vänster. 


3 5 OK 5 3 - 

_+OK 8 - 

17 13 O K 13 17 8 - 

—OK 4 8 - 

/OK 2 - 

20 K - 

Eller om man skriver det på en rad: 

3 5 + 17 13— /.2 OK 


För att tydligare förklara vad som 
har utförts, skriver jag räkningen en 
gång till, men på det sätt man brukar 
skriva i matematiken: 


17—13 


För att ge några ytterligare exempel 
på hur det kan se ut när man använder 
FORTH så måste jag först förklara 
hur man skriver program, definierar 
ord, i FORTH. Det är egentligen gan¬ 
ska enkelt. Om du t ex vill ha ett ord 
som skriver HEJ DU GLADE varje 
gång du utför ordet, som du kan kalla 
HEJ, så skriver du: 

: HEJ .” HEJ DU GLADE ” : OK 


Nu räcker det med att skriva HEJ så 
utförs ditt nya ord, precis som om det 
alltid skulle ha funnits hos FORTH. 
HEJ HEJ DU GLADE OK 


En definition börjar alltid med ordet 
: (kolon), som vill ha namnet på den 
nya funktionen och sedan de ord som 
talar om hur ordet ska fungera. Det 
hela avslutas med ; (semikolon). Nu yt¬ 
terligare några exempel: 

: ÖKA-MED-TVÅ 2 + : OK_ 

1 1 ÖKA-MED-TVÅ . 13 OK _ 

: + FYRA ÖKA-MED-TVÅ ÖKA- 
MED-TVÅ :OK_ 

38 + FYA . 42 OK_ 

17 + FYRA + FYRA. 25 OK_ 

: PRINT .: OK 

17 + FYRA + FYRA PRINT 25 OK 


Som du kan se på exemplen ovan så 
kan du ändra och bygga ut FORTH 
precis som du vill. Du kan t ex ta ordet 
ÖKA-MED-TVÅ och använda det i 
ordet +FYRA, eller ”byta namn” på . 
(punkt) till PRINT om du vill. 



Detta gör FORTH till ett väldigt fle¬ 
xibelt språk, som hela tiden anpassar 
sig till den som använder datorn. För 
att jämföra FORTH med andra språk 
kan jag nämna en tabell som jag såg i 
tidningen Mikrodatorn nr 9-83, där 
författaren hade jämfört olika språk 
med varandra. 

Hur är FORTH jämfört 
med andra språk? 

De språk som fanns upptagna i ovan 
nämnda tabell var bl a BASIC och 
FORTH, och de hade fått olika ”be¬ 
tyg” efter deras resp förmåga att vara 
bra för nybörjare, snabbhet, allsidig¬ 
het osv. Bland de saker som FORTH 
hade fått höga betyg i fanns allsidig¬ 
het. Detta kunde du ju se redan i 
exemplen ovan, men vänta tills du lärt 
dig mer . . . (för du har väl blivit nyfi¬ 
ken på FORTH, eller . . .). Även i 
snabbhet och minnesbehov, dvs hur 
mycket programminne som behövs ha¬ 
de FORTH fått höga betyg. I dessa tre 
olika värderingar hade däremot BA¬ 
SIC fått medel eller lägre, men desto 
högre angående lätthet att lära och hur 
lätt det ä att få tag på (det finns ju i 
nästa alla små- och mikradatorer). Om 
man sedan tittar på allmänna bedöm¬ 
ningen så hade FORTH högsta (!) me¬ 
delbedömning, vilket kan vara intres¬ 
sant att veta (BASIC kom på andra 
plats av fem språk). Det enda som 
FORTH hade fått dåligt på var i hur 
lätt det är att lära. Detta kan nog stäm¬ 
ma, men kanske bara hos de som re¬ 
dan kan t ex BASIC. FORTH är näm¬ 
ligen helt annorlunda jämfört med an¬ 
dra språk. Själv kunde jag både BA¬ 
SIC och del andra spåk innan 
FORTH, så jag fick verkligen försöka 
glömma det jag redan kunde om BA¬ 
SIC och se på FORTH med nybörja¬ 
rens ögon. De som nu redan kan ett 
annat språk ska inte stick huvudet un¬ 
der jorden bara för det. Man har ju all¬ 
tid nytta av att kunna programmera, 
samt att känna till en del om datorer. 
Boken ”Starting FORTH” av Leo Bo- 
die tar fasta på detta och har skrivit 
boken för två typer av människor. 
Dels de som redan kan programmera 
datorer i ett annat språk, och dels de 
som inte kan programmera alls. Den 
boken rekommenderar jag starkt till de 
som vill läsa mer om FORTH. 

I en senare artikel kommer jag att lä¬ 
ra ut FORTH till den som vill få en 
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djupare inblick i språket, samt ge en 
del tips till de som redan har köpt eller 
funderar på att köpa FORTH till sin 
V1C. Denna tillsats kostar 495:— och 
detta pris är också ur prislistan från 
83-08-15. 

Om ni har några frågor om 
FORTH, allmän eller speciellt för 
V1C-FORTH, så kan ni skicka in dem 
till tidningen så ska jag försöka svara 
på en del av dem i mån av kunskap och 
tid. 

Sammanfattning 

Slutligen vill jag göra en liten samman¬ 


fattning av en del viktigt ur artikeln: 

• FORTH är ett annorlunda språk. 

• Det skapades på 70-talet av Charles 
H. Moore. 

• FORTH består av en massa ord, och 
kan definiera egna sådana. Då man 
gör det kan man säga att man bygger 
ut spåket. 

• Alla beräkningar sker på en stack i 
omvänd polsk notation, RPN. 

• FORTH har ofta inte decimaltal 
från början, inte V1C-FORTH t ex, 
men om man inte klarar sig utan kan 
man fixa det själv. 

• Man bör helst ha en diskettstation. 


• Boken ”Starting FORTH” av Leo 
Brodie är en bra bok. 

• FORTH är ett trevligt och intressant 
språk, som är kul att lära sig och att 
använda. 


Några lästips: 

• Starting FORTH, av Leo Brodie. 

• Tidningen BYTe, augustinumret 
1980. Har FORTH som tema. 

• PET-FORTH handboken. Bra att 
ha om man har köpt V1C-FORTH. 


KALENDERPROGRAM 


Almanackor är ju oumbärliga hjälp¬ 
medel för att orientera sig i tillvaron. 
Felet med dem är att de bara gäller för 
ett år i taget. Den som vill ha en evig- 
hetskalender kan faktiskt programme¬ 
ra in en sådan på sin VIC, fast det blir 
förstås ett ganska vidlyftigt program. 

Problemet är för det första att vi 
bytte ”stil” år 1753, då vi fick den gre¬ 
gorianska kalendern i stället för den 
julianska (som alltjämnt används i 
Sovjet och en del andra länder). På så 
sätt infördes en ny skottårsräkning 
bl a. Det är ju skottåren som ställer till 
trassel i ordningsföljden, bl a när man 
ska räkna ut veckodag för ett visst da¬ 
tum. 

Det finns olika sätt att lösa skottårs- 
problemet i ett kalenderprogram. Ett 
är att utgå från regeln att samma vec¬ 
kodag återkommer på samma datum 
vart 28:de år. Det stämmer så länge 
man bara håller sig inom ett århundra¬ 
de. Överskrider man sekelgränserna så 
blir det fel. 

Det program som presenteras här är 
i princip mycket enkelt. Det baserar sig 
nämligen på fenomenet, att året inte 
har jämnt 365 dagar utan faktiskt 
omspänner 365,2425 dygn. Avkortat 
till 365,25 fås automatiskt ett tillägg 
för skottdagen vart fjärde år utan någ¬ 
ra krångliga IF-satser. De enda undan¬ 
tagen gäller sekelskiftena 1800 och 
1900, som inte är skottår. Där hoppas 


skottårsmånaden februari 29 dagar 
över med en IF-sats. 

Programmet, som täcker alla år mel¬ 
lan 1753 och 2100 är ganska långsamt, 
eftersom alla räkningar sker från 1753. 
Men det är i stället så mycket säkrare. 

När infaller påsken 

Det andra programmet räknar ut på 
vilket datum påskdagen infaller under 
valfritt år. Det är ju som bekant lite 
olika med den saken. Det var på kyr¬ 
komötet i Nicea år 325 som det be¬ 
stämdes att påsken skulle inträffa/örs- 
ta söndagen efter första fullmånen ef¬ 
ter vårdagjämningen, doek inte senare 
än den 25 april. 

Det där kan ju låta lite avskräckande 
för en programmerare, men problemet 
är till största delen redan löst av den 
geniale tyske matematikern Karl Fried¬ 
rich Gauss, som år 1800 konstruerade 
en formel för uträkning av påsktermi¬ 
nen. 

Den här formeln är ganska inveck¬ 
lad. Det tar tid att hanskas med den 
för hand med block och penna, och 
med fickräknare går det inte mycket 
lättare. Däremot är den tämligen enkel 
att programmera på datorn. 

Formeln tyder: 

Önskat årtal divideras i tur och 
ordning med talen 19, 4 och 7. När det 
är gjort tar man resterna efter divisio¬ 


nerna och kallar dem förslagsvis A, B 
och C. Till 19*A lägger man ett tal, 
som vi kallar M och som är olika be¬ 
roende på århundrade. Ligger årtalet 
före 1800, så är M=15. För åren 
1800—1900 har M värdet 23 och för 
1900 fram till 2099 ärM = 24. 

19A + M divideras med 30 och resten 
kallar vi D. Sen tar vi 2*B + 4*C + 6*D 
och lägger till ett tal N, som skiftar 
värde precis som M. Före 1800 är 
N = 6, 1890— 1899 är N = 4 och mellan 
1900 och 2099 har N värdet 5. 

2*B + 4*C + 6*D + N ska sen divide¬ 
ras med 7. Resten kallar vi E. För att 
få påskdagens datum adderar man till 
sist D + E + 22. Om talet man får är 

= 31 infaller påsken på givet datum 
i mars. Är talet 31 minskar man 31 
och får datum i april. Skulle det mot 
förmodan inträffa att svaret blir den 
26 april, vilket det följande program¬ 
met inte är garderat mot, så infaller 
påksdagen i verkligheten en vecka tidi¬ 
gare. 

Conny Jonsson 
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Konvertering av 

stryktipsprogrammet 

”DATA-TIPS’’ 

I föregående nummer av VIC-RAP- 
PORT, 5/6 1983, presenterades 

stryktipsprogrammet ”DATA¬ 

TIPS”. Programmet skrevs urspru¬ 
ngligen för tipsmatcher med lag ur de 
båda högsta, engelska divisionerna. 
Bland de förfrågningar som ställts till 
programmakaren märks frågan om 
hur att konvertera programmet för 
tipskuponger med lag ur de högsta, 
svenska divisionerna. Bifogad list- 
ning visar vilka rader som skall än¬ 
dras samt eventuellt tillskrivas. Sist i 
listningen visas de radtillsatser som 
brukare med floppydisk behöver än¬ 
dra utöver bifogad listning. Vidare 
skall tilläggas, att din VIC-20 måste 
vara expanderad med minst 16 K- 
Ram. Programmet passar även VIC- 
64. VIC-apparater med tecknen, Å, 
Ä och Ö som extra tillbehör, skall ob¬ 
servera den programsats som med¬ 
följer utbytessatsen från Handic. Fil¬ 
hanteringen fungerar nämligen inte 
förrän rekommenderad programsnutt 
lästs in och exekverats. 

Läs in ditt DATA-TIPS från din 
bandstation eller diskdriver. Lista de 
rader som redovisas i bifogad listning 
och ändra dem. Nytillkomna rader 
skrivs med de radnummer som visas. 
Provkör programmet. 

Då du kör igång det nu ändrade 
programmet ställs frågan: ”VAL: 
ENGELSKA (E) ELLER SVENSKA 
(S) LAG? ” Besvara frågan med E el¬ 
ler S. Väljer du E-svaret, fungerar 
ditt program precis som tidigare. Du 
har ju match-data fil på band eller 
disk. Väljer du svaret S, finns ingen 
färdig match-data fil — om du inte 
köpt ett färdigt program —. Det ne¬ 
gativa svaret vid frågan om datafil 
finnes flyttar programmet till det av¬ 
snitt där filen skapas. Kör du band¬ 
station uppmanas du skaffa ett band 
för ”engelsk matchdata och ett band 
för svensk matchdata”. Använder du 
floppyn, kan du behålla den engelska 
filen, eftersom filer med olika namn 
skapas. Du får på så sätt ett data-tids- 
program, två sekvensielia filer 
(MATCH-DATA och MATCH¬ 
DATA (S)) på samma diskett. Vid 
nyskapande av match-data fil, vilket 
kan ske i god tid före de svenska fot- 


bollsserierna startar, gäller det att 
hålla sig till lagnamn, som datorn se¬ 
dan känner igen. En komplett för¬ 
teckning över de svenska lagen i all¬ 
svenskan, samt norra och södra divi¬ 
sion 2 serierna bifogas. Skapar du fi¬ 
len före seriestarten, matar du endast 
in lagnamnen samt besvarar alla övri¬ 
ga frågor med 0 (nollor). När inmat¬ 
ningen avslutats och filen stängts 
återstartas programmet. Du kan nu 
besvara matchdatafrågan med Y och 
t ex välja tabellutskrift och kontrolle¬ 
ra dina lagnamn. Observera vidare, 
att för att ett lag skall kunna köras i 
tipssekvensen, måste laget i fråga ha 
spelat minst en match. 

Fungerar allting korrekt, kan du nu 
spara undan programmet. Du har ett 
tipsprogram, som fungerar för både 
engelskt och svenskt tips. Program¬ 
met finns som tidigare att köpa från 
Ingvar Wihlborg. Tel: 0300—119 80. 
Se annons i denna tidning. 

SVENSKA LAGNAMN FÖR 
DATA-TIPS: 

ALLSVENSKAN: 

AIK BRAGE ELFSBORG GEFLE 
GOTEBORG HALMSTAD HAM¬ 
MARBY KALMAR FF MALMO FF 
NORRKÖPING ORGRYTE OSTER 


DIV 2 SODRA: 

FRÖLUNDA GAIS GRIMSAS 
HÄCKEN HA LM/A HELSING¬ 
BORG IFK MALMO KALMAR 
AIK LANDSKRONA LUND 
MJALLBY M YRES JO NORRBY 
TRELLEBORG 

DIV 2 NORRA: 

ÅTVIDABERG BROMMAP. DE- 
GERFORS DJURGARDEN 

ESKILSTUNA IFK VASTERAS 
KARLSLUND NYKÖPING ORE- 
BRO SANDVIKEN SKELLEFTEÅ 
SUNDSVALL VASALUND VAS¬ 
TERAS SK 

(observera att Å Ä och Ö skrivs med 
A resp. O). 

Ingvar Wihlborg 
( 371107 - 375 ) 


STRYKTIPSPROGRAMMET 

"DATA-TIPS" 

MED MATCH-DATA 

Programmet finns för både VIC- 
20 och VIC-64. Ange apparat, 
kassett eller diskett. 

Pris: 90-125 kr. 

Beställes av Ingvar Wihlborg, 
tel 0300-119 80 eller genom 
postgiro 4793776-8. 
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LISTpiNDRINGRR och TILLSGC För rtt 
KONVERTERA 'DATA—TIPS' TILL BfiDE 
ENGELSKA OCH SVENSKA MATCHER: 


10 INPUfVAL ENGELSKA(E) ELLER KSVENSKA(S) LAG",NT* 

15 IFNT*="E"THENNT*»"":flX=44 ; HT=21 R=3 : GOTG30 
20 IFNT*="S"THENNT*="(S)" : AX=40 A=2:GOTO30 
25 RUN 

60 F0RN=1T0AX 

106 F0RN=1T0AX : IFX*=L*CN>THENH»N:GOTO108 
103 F0RN=1T0AX:IFY*=L*CN)THENB=N:G0T01 10 
133 F0RN=!TGAX 
158 IFN=AXTHEN152 
183 PCN)=V(N>»A+0<N> PRINTPCN) 

225 F0RN=lT0fiX 
235 F0RN=1T0AX 

240 IFG*(I)=L*CN)THENB=N = G0T0242 

242 H2=P(H> IFHZ<1THENH2=1 

243 EZ=P(B) : rFB2<lTHENBZ=l 
250 IFPCH»P(B>THENET=ET+H2/BZ 
252 IFP<B)>P(H)THENTV=TV+BZ/HZ 

1109 F0RN=1T0AX FRINT"T,"MATCH-DATA #'NN:PRINT 

1115 PRINT"INSL. MAL "i ’■ INPUT#9,tl : PRINT#1,U : PRINT ; PRINTtl,V-U : PRINTtl, X*A*V 
1125 PR INT# 1 ,A CLOSE1 CL0SE9 RUN 
2001 IFR=2THEN2011 

2010 PRINT"#2 : DIVISION 2" PRINT GOTO2020 

2011 FRINT"#1 ALLSVENSKAN" PRINT 

2012 PRINT"#2 DIV.2/SODRA" PRINT 

2013 PR1NT"#3 DIV.2/NORRA" PRINT GOTO2036 

2036 INPUT"TABELLVAL",TA 

2037 ONTAGOTO2033.2040,2042 

2038 PR IHT "T; TAB (5)" ALLSVENSKAN" PRINTTABC5) -PRI NT TX= 1 TY= 12 •' AT=1 

1: GOT02045 

2040 PRINT"T;TAB(5)"DIV . 2/SQDRA” ; PRINTTAE<5)'-: PRINT: TX=13:TV=26:AT= 

13 : GOTO2045 

2042 PRIHT" n" ; TAB< 5)" DIV . 2/NORRA": PR INTTABC5) - " PRI NT TX«27 T 1 V=40: AT= 

13 

2047 FORN=1TOAX :BBf Ni =0:NEXTN;CC=0 
2105 FORN=0TOAT 

2200 REM *»*»*4m*** ♦»*****♦***♦♦♦♦♦♦ ♦♦«**♦»»♦*»*♦♦*# 

2210 REM FoR DISKETTER OfiLLER DnRUTöVER FÖLJANDE 

2215 REM RAD 56 0PEN1,8.2,"MATCH-DATA"+HTf+",S,R" : PRINT"MATCH-DATA LADDAS NU" 
2228 REM-RAD 132 0PEH1,S,2,"00 MATCH-DRTA“+NT*+",S.W" PRINT 'TMATCHRES. OCH.... 
.ETC" 

2225 REMRAD 1105 0PEH1,8,2,"MATCH-DATA"+NT*+",S,U" OPEN9.0 
2230 REM ■ *****m;##******#**#*###****#***M**#*#**!Mf** 

READV. 
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program till 

VIC-64 och VIC-20 

Datorer och tillbehör! 

Katalog 92 sidor 15 kr. 


databöcker 

för 


VIC20 

I/IC64 

SPECTRUM 


Beställ vår lista 

013-12M0 


PROGRAMDISTRIBUTOREN 

Box 3009 

S-580 03 Linkopmg. Sweden 


V 



VIC20 

VÄXLINGSBART 

16K RAM 



• I matchande plastlåda 

• Kan växlas mellan 3,8, 16K 

• Senaste CMOS-teknologin 

• 6 månaders garanti 

• Hög DOWNSWAY kvalité 

Begär katalog över hela vårt 
VIC20/64 sortiment. 


Pris inkl. moms. Porto tillkommer. 



DATAMÄKLAREN 


Vasavägen 61 C. Linköping 
Tel. 013-10 31 74 


ÅTERFÖRSÄLJARE 

SÖKES! 

ARNSVIK-DATA 

Box 19017 • 250 19 Helsingborg 
Telefon 042-922 29 
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rapP° rt 


RE '(• i 4 4i4 4 44 ¥4;444444 4 


3 REM 

4 REM 

5 REM 

6 REM 

7 REM 

8 REM 

9 REM 


80 PRI NT 
99 PRIHT 

91 PRIHT 

92 PRINT 

93 PRINi 

94 PRINT 

95 PRINT 

96 PRIN i 
37 PRIHT 
9b PR IHT 


" a ■ 

i! ä 


a ® :: 
a ■" 
a s" 

DITT SLRG" 
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■t: MADE BV 4 

4 HAKAN 1HUKSELL4 
4 NI ! ARtGA i flN 3 4 
4 38266 LI h K ö PIH G '4 
4 PRUGRRM FÖR 4 
4 VIG 64 4 

44444444444444444 
10 PRIHT CHR $C 147> 

20 PR I NT" .»^^msfiT^sTsf&IEiOKN IHG " 

30 PRI NT I^f^SÄKRlV DITT NfiMH" 

35 pRINT"ÄT; 

40 INPiJi Sf 

45 IF S*=" i: THEN S$= ,! RASOPEN ANDERSSON 11 
50 PRINT"ÄMsLfsfiTittiU KAN SLA SWING, UPPERCUT, RASOP" 

60 PR I NT :1 .*MÄT;t-SW ING U=UPPERCUT • R=RASOP" 

65 PRINT"ÄMsTsITRVCK EN KNAPP FÖR fl l I BÖRJA" 

Kö UEI Af : I fA$ s ""THfcN 70 
CHR4 i 147 > 
u, iWi\m9¥' 

i!: .T=T=ia'-'* : ' 

m-'- 

l§ $ gj M" 

8# g m gj a§ <: 

11 a 

- a * ’ 

“ a * 

f t »jj j$jj 

100 PRINT"WTRVCK 
105 IFL-7 THEN 500 
116 GET H$ ; IFH$=""THEN i 18 
120 IF H$= "STHEN200 
130 IF H$= 11 U " THEN30W 
14W IF H$="R“THEN408 
150 GOTO 110 
208 Q= i NT c: RND < 1 > 418 > 

210 IF Q95THEN PRINT"MTRÄFF MED SWING" : L- : L+1 : T=T+1 
215 IF ö 05 THEN PRI NT "»MISS MED SWING" L-L+i 
230 GOTO i85 
3 O 8 Q = IN T < R H D < 1 > 410 > 

310 IF Q05THEN PRINT"MTRÄFF MED UPPERCUT" L=L+1T=T+1 
315 IF Q05THEN PRI NT" Ml ISS MED UPPERCUT" L=L+i 
330 GOTO 105 
400 Q = IN T <R N D < 1 ) 410 > 

410 IF Q95THEN PRINT"MTRÄFF MED RASOP" : L=L+1 -T=T+1 
415 IF Q<=5THEH PRINT"SMISS MED RASOP" : L=L+1 
430 GOTO 105 
500 IF T>4 THEN 680 

518 PRI NT "MM", : PRINTS$" FÖRLORADE MATCHEN MOT VÄRLDSMÄSTAREN" 

528 GOTO 616 

680 PRINT ; PRINTS$" AR NV VÄRLDSMÄSTARE , HAN FICK IN "T" TRÄFFAR' 

605 IFT>6THEN PRINTSf" HADE NVBÖRJARTUR" 

610 PRINT" MM7ILL DU BOKAS EN GAHG TILL" 

620 GET P$:IFP$=""THEN 620 
625 IF p$-"N"THEN 650 
630 IF P$="J"THEN RUN 
640 GOTO 628 
658 END 

READV. 





















rapP° rt 


0 REST DRE:CLR 

1 PRI NT "El" 

2 RtM OMGJORT i983 16/12 fiV HAKAN O ELISABETH THORSELL 

3 REM URSPRUNGLIGEN FRAN VIC RHPPHRT 
5 PRINT"**** VILKEN VECKODAG ***.*" 

10 INPUT"VILKET AR";fl 

11 INPUT "VILKEN MANAD";B 

12 INPUT "VILKET DATUM";C 
30 FOR I =i TO 2 

40 D=fl~1753 
58 S=D*365.25 

55 IF AC1753 THEN PRINT "ARET MASTE VARA EFTER 1753" 

56 IF EM 2 IHEN PRINT" ETT AR HAR HÖGST 12 MANADER" 

57 IF 031 !HEN PRINT"EN MANAD HAR HÖGST 31 DAGAR" 

60 IF D>47 THEN S=S-1 

70 IF D>147 THEN S=S-1 
75 S= I NT C S ) 

80 NEXT I 

85 IF fl<1752 THEN GOTO 89 

86 IF B>13 THEN GOTO 89 

87 IF 032 THEN GOTO 89 

88 GOTO 90 

89 PRINT"DET HAR FAR DU GÖRA OM!"-GOTO 10 

90 FOR J=1 TO 12 
100 READ D 

110 IF J=B THEN 132 
i20 S-S+D 
130 NEXT J 

132 IF A=1800 OR A*1900 THEN 145 
135 IF J-2 AND A/4=INT<A/4>THEN D=29 
140 IF J>2 AND fl/4*INT<fl/4> THEN S=S+1 
145 GOTO 150 

150 DAT A 3 i .■ 28,31.. 30.. 3 i.. 30.. 31,31,38.31.30.31 
152 PRINT : PRINT 

155 PR I NT" DEN"; C .i " /", B; " AR"A," AR EN "; 

160 S-S+C 

163 IF OD THEN GOTO 1 

165 IF OD THEN PRINT "LAR DIG MANADERNA!" 

170 S1=S-1NT<S/7-0.1>*7 

180 ON S1 GOSUE 201,202,203,204,205,206,207 
190 GOTO 210 

281 PRINT"MANDAG"•RETURN 
2G2 PRINT"TISDAG" RETURN 

203 PRINT"ONSDAG":RETURN 

204 PRINT"TORSDAG":RETURN 

205 PRINT"FREDAG":RETURN 

206 PRINT"LÖRDAG"•RETURN 

207 pr i nt"söndag m = return 

210 PRINT"MWILL DU FORTSATTA U/N)?" 

211 GETL$■IFLf=""THEN 211 

212 IF Lf="J"THEN RUN 

213 IF L$="N"THEH 220 

214 GOTO 211 

220 PRINT"7J3LUT! " 

230 END 

READV. 


29 

















Rapport från 

Skäftingbackens 

Datorörnar 


Skäftingebackens Unga örnar hade 
ett problem gemensamt med alla barn 
och ungdomsorganisationer. När 
medlemmarna växte upp så tröttnade 
de på verksamheten, och slutade. 

För att behålla medlemmarna så 
beslöt styrelsen att starta en dator¬ 
grupp. Jag fick uppdraget att sköta 
det praktiska. Först gällde det att väl¬ 
ja dator. Vid en första granskning 
hur mycket dator man får per krona 



så föll genast ABC och Apple bort. 
Sedan gällde det att försöka gissa vil¬ 
ka datorer som kan finnas kvar på 
marknaden om 5 år. Det är inte så ro¬ 
ligt att köpa en dator, om det inte 
finns tillbehör eller reservdelar till 
den efter några år. Då återstod det 
bara V1C och Sinclair. Att välja mel¬ 
lan en dator och en leksak var inte 
svårt. Det blev V1C. Styrelsen beslöt 
att köpa in en VIC 20. Själv köpte jag 
en 64. Datorgruppen fick namnet 
Skäftingebackens datorörnar. För att 
få in pengar till löpande kostnader så 
tog vi ut en gruppavgift på 100:— per 
person och termin. Många olyckskor¬ 
par kraxade och trodde att ingen 
skulle betala det. Men alla 10 platser¬ 
na blev genast fulltecknade. Vi lycka¬ 
des ragga upp två skraltiga svartvita 
TV som vi bar ner i Unga örnars lo¬ 
kal. När det gällde studiemateriel så 
var det värre. Det finns hur mycket 
dåligt materiel som helst för vuxna. 
Men inget som är lämpligt från 10 år 
och uppåt. Så jag fick göra eget ma¬ 
teriel. Vi började så smått med att ha 
möte en kväll i veckan. 1 timme ut¬ 
bildning i programmering, och en 
timme spel. Snart så kom med¬ 
lemmarna och lånade datorn själva. 
För att minska slitaget på kontakter¬ 
na så monterade vi upp anläggningen 
på en spånskiva. Ett vanligt handtag 
från en kökslåda gjorde det lättare att 
bära. Nu var datorn utlånad strängt 
taget varje kväll i veckan. 

Till en början var det mest spel för 
hela slanten. Men snart började några 
att programmera på egen hand med 
hjälp av manualen och de hand¬ 
böcker vi hade köpt. De aktiva fick 
egna kassetter som de kunde spara 
programmen på. Nu började verk¬ 
samheten svälla ut för mycket. Det 


var för många intresserade, och bara 
två datorer. 

Vi ansökte om bidrag till utrust¬ 
ning av lokalen. Det blev genast 
backslag från fritidsförvaltningen. 
Utrustningsbidrag skall användas till 
inköp av möbler, gardiner, färg och 
annat till lokalen. Inte till annat. Nå¬ 
got nytt bidrag skulle vi inte få förrän 
om 10 år. 

Efter mycket förhandlande så fick 
vi köpa datorutrustning i stället. Nu 
hade vi 16 000 att sätta sprätt på. Vår 
leverantör VIC-center ställde som all¬ 
tid upp för oss. Vi lämnade in en be¬ 
ställning. Betalningen skulle ske ge¬ 
nom faktura. Då slapp vi problemet 
med att springa omkring med en mas¬ 
sa pengar i fickan. Det blev genast en 
64:a, bandstation, diskettenhet, skri¬ 
vare och en massa utrustning till det. 
För att förhindra stöld, så har vi 
monterat stöldlarm, galler för fönst¬ 
ren, förstärkt dörrarna, och en mas¬ 
sa annat. Skall någon obehörig ta sig 
in så får de använda dynamit. Kofot 
räcker inte. Nu är det full verksamhet 
i lokalen. Som mest är vi 15 med¬ 
lemmar. Till detta kommer det till¬ 
fälliga besökare som får pröva på att 
ratta datorerna. 

Många vuxna undrar vad det är för 
nytta med att kunna programmera ett 
spel. Det är ingen som har fått an¬ 
ställning bara för att de kan pro¬ 
grammera i BASIC. 

Jag brukar be dem titta på samhäl¬ 
let i dag. Det är många som är direkt 
beroende av bilen, såsom tillverkare, 
reparatörer, försäljare, drivmedels- 
försäljare och annat. Det kommer 
att bli samma med datorn. 

När det gäller datorer har vi ännu 
inte kommit in i T-fordstadiet. Fun¬ 
dera hur samhället kommer att se ut 
om 10 år. ALLA kommer att vara be¬ 
roende av datorer. När det gäller BA¬ 
SIC så är det ett nybörjarspråk. Först 
så måste man begripa hur datorn och 
ett program fungerar. Därefter kan 
man gå över till strukturerad pro¬ 
grammering och filhantering. Alla 
våra stora författare började med att 
skriva; FAR ÄR RAR MOR ÄR EN 
ORM. De började inte i sjunde klass 
med att författa romaner. 
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En positiv sida med datorer är att 
intresset för skolan ökar. Nu inser de 
att de måste lära sig engelska. Annars 
kan de inte läsa alla krångliga bruks¬ 
anvisningar som medföljer appara¬ 


terna. Utan mattekunskaper så blir 
det inga bra program. Skrivmaskin- 
sträning kommer på köpet. 

Så vi i Skäftingebackens datorör¬ 
nar har bara positiva erfarenheter av 


datorer. Det bästa råd vi kan ge är: 
Starta en grupp själva. 

Skäftingbackens datorörnar 
Alf Olsson 



Starta datorgrupper 


Alldeles förmånga sitter hemma och 
knappar i sin ensamhet. Mest beroen¬ 
de på att de inte har någon att dela 
sitt intresse med. Varför inte starta en 
förening och vara tillsammans med 
andra hackers. Problemen kan verka 
många och oöverstigliga. Men de går 
att övervinna. 

1. Hur få medlemmar. Sätt upp en 
lapp på skolornas anslagstavlor. När 
ni är ca 5 st så kan ni bilda en inter- 
imsstyrelse. Stadgar för föreningen 
kan ni planka i VIC-tidningen nr 4. 

2. Se till att få medlemmar under 

25 år. Kommunens fritidsförvaltning 
lämnar aktivitetebidrag om det är 5 
medlemmar i åldern mellan 7 och 25 
år som håller en planerad verksamhet 
om minst en timme. Hur stort bidra¬ 
get är varierar mellan varje kommun. 
Lägst är det statliga bidraget på 10:— 
per sammankomst. Upp till 50:— i 
Stockholms kommun. En förutsätt¬ 
ning är att en majoritet av med¬ 
lemmarna i hela föreningen är under 

26 år. Tanken är att det skall vara en 
ungdomsorganisation. 

Tag kontakt med kommunens fri¬ 
tidsförvaltning, eller med sociala ser¬ 


vicecentralen så kan de lämna mer 
upplysningar. 

Kommunen kommer troligen att 
kräva att ordföranden eller kassören 
är med på ett informationsmöte som 
kommunen anordnar i bidragsbe- 
stämmelser. 

När ni har haft cirka 20 samman¬ 
komster. Då kan ni ansöka om start¬ 
bidrag för föreningen. 

Nu gäller det att ordna en lokal. 
Många föreningar har en lokal som 
de utnyttjar dåligt. För att få behålla 
sina hyresbidrag så måste de ha minst 
4 sammankomster i veckan. Många 
ligger på håret. Prata med styrelsen 
om ni inte kan dela på lokalen. Har 
de 2 sammankomster, och ni tre per 
vecka. Då klarar bägge gränsen för 
att ha egen lokal. 

Nu bör lokalfrågan vara löst. Om 
kommunen bidrar med 90% av hy¬ 
ran. Då bör det vara lätt att förhand¬ 
la om hur stor del varje förening skall 
betala själv. Nu behöver ni utrustning 
till lokalen. Många kommuner läm¬ 
nar bidrag till utrustning av lokalen. 
Genom att ni har startat en datorföre¬ 
ning så är det naturligt att ni möble¬ 


rar med skrivare, diskett och datorer. 

Är ni ett gäng över 14 år så kan ni 
starta en studiecirkel i datorer. Lägsta 
gräns är 5 deltagare under 14 år. Kon¬ 
takta ABF så kan de berätta allt. Cir¬ 
kelledaren får betalt för att ställa 
upp. 

När det gäller TV-apparater så kan 
ni gå runt i grovsoprum och contain¬ 
rar och leta. Sätt upp lappar på por¬ 
tarna att ni vill ha begagnade fung¬ 
erande TV-apparater. Är ni en före¬ 
ning så är folk piggare på att ställa 
upp. Prata med TV-handlarna om ni 
inte kan få en inbytesapparat som de 
ej kan sälja. 

När ni väl har startat en fungeran¬ 
de förening, då är många dörrar öpp¬ 
na. Ni kan få låna skolornas datorer. 
Eller så kan ni få tillträde till många 
databaser. Då är det inte en enskild 
person, utan en förening som står för 
ev skadegörelse och alla kostnader. 

Lycka till med startandet av da¬ 
torgrupper. 

Skäftingebackens datorörnar 
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READV. 


0 REM *** * t***+ ****** 

1 REM * MASTER MIND * * AV JOHAN * * NÄSLUND * * 1983-1 

2-27 * 

2 rem *************** 

3 REM' sti**i* 

3 GOSUB5000 


f. nriTO6020 

28 Mf*"*i'=1 • • • • m *" Ef ="MASTER MIND" 
PO v: 3 XX=5 PX=7630 F=38480 X1 15 • SI =38874 

48 FORT =0TO3 KX < T > =0: K1 V. < T > =8 : K2X C T > =8 ■ NEXTT 


P0KE36879.-78 P0KE36S78• 
83=36876:SLX=0 


188 REM#** SPELPLAN ** 


118 PR I NT" n<!Ä*M*':14S ••••■" 

120 FOF:T=2T011 PRINT"B* *" : PRINT" *"MIDf <Ef T.■ 1 :> '■ M$ NEXTT 
280 REM 4 4*+ KODEN **** 

210 F0RT=8T03 ; K1X<T>=INT<RHD<1>*8>+l NEXTT 


15 


220 

300 

310 

328 


G0TO420 

REM#* GISSNING *** 
GOSUB8010 

pe;:=pee! <px+xx+22*vx • 


## H. PROG. *** 


IFPEX<128THENP0KEPX+XX+22*VX,PEX 


P0KEF+XX+22*VX ■ 6 GOTO 


350 

330 P0KEPX+XX+22*VX,PEX-128 
358 IFA$=" THENGOSUB1000 G0T0428 
355 IFAf="'il" THEH410 


368 AX=VAL<A$) 

378 I FAX 10RA5O8THEN310 
380 PGKEPX*XX+22#VX 43+AX 
390 TX '.:XX-5)/2 


400 

410 

420 

425 

430 


KX < TX > =AX 

xx=xx+2 ifxxmithenxx=5 

IFSLX=1THEN2100 
IFSLX-2THEH2000 
P0KES3 .• 180+AX*3 ■ POKEPX+: 


!X+22#VX • F'EEK< PX+XX+22*VX > + 128 ■ P0KES3. O 


500 GOTO300 

1000 REM*** JAMFOR *** *** KODER *** 

1020 FORT=0TO3 • K2X<T>=K1X<T> ' NEXTT 


1048 FORT=0TO3 
1050 FORR=0TO3 

1068 IFKX T > =K2X<R> THENI FR=TTHENGOSUE3000 
1070 NEXTP T 

1830 IFX1 X> 18THEHSLX=2 : RETIJRN 
11R0 F0RT=8T03 : FORR=0TO3 

1110 I FKX < T ) =K2X < R > THEN IFROTTHENGOSUB3040 
1120 NEXTR..T 

1150 x 1 X= 15 : XX=5 : VX=VX+2 FORT=0TO3 = K2X ( T > =0 : KX < T > =0: GETA$ NEXTT 
1188 I FVX>22THENSLX= 1 : RETIJRN 
1208 RETIJRN 

2800 REM*** SLUT *** 

2082 P0KE36879,27 

2005 GOSUB4800 

2808 PRI NT" XDSWBRA "SfcSPX) 

2018 PRIHT"MW DU KLARADE DET PA "<<VX-3>/2> + l" FORSOK" 

2815 FOX<SPX>=< < VX-3>X2)+1 
2020 PR I HT " WiTiKODEN VAR " 

2830 PRINT" miV ■ ■ FORT=0TO3'PRINTK1X <T >j:NEXTT 
2035 PRIHT 

2038 IFSPXCRTXTHEN6000 

2039 PRINT" MMW" GOSUE8000 : GO8UB7000 

2040 PRINT-MSTiTjia ETT SPEL TILL ? ■" 

2058 GETAf IFAf="J"THENRUN 

2060 IFA$="N"THENEND 
207£i GOTO205Ö 

2100 REM**** SLUT **** **** MISS **#* 

2102 FQKE36379,11G G0SUE4100 GOSUB8020 P0KE36879■26 
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** PLATS 


** PLATS 


ii 


** 


2105 PR I NT " nWSWstS YNB "S$<SPX> 

2110 PR I HT" SKSiTDU KLARADE DET IHTE" 

2120 GOTO2020 

3000 REM#* RATT FARG** *# RA RATT ** 

3010 PQKEPX+X 1X+22#YX, 90 POKEF+X1 X+22*VX, 0 
3020 K2X<R>=-2=KX<T>=-1 XIX=X1X+1 RETURM 
3030 REM#* RATT FARG** ** PA FEL ** 

3040 POKEPX+X1X+22*YX > 90 PQKEF+X1X+22#VX.- 1 
3050 K2X<R)=-2 KX(T >=~1X1X=X1X+1 : RETURM 
4000 REM** GLADLJUD ** 

4010 FOPT=1T05 ; FORR=150TO220 ; P0KES3,R : MEXTR/T 
4015 P0KES3 .• 0 
4020 RETURM 

4100 REM** SUR-LJUD ** 

4110 FORT* 1TO80: POKES1,287-T : FORR=1 TO 10 MEXTR .• T 
4120 RETURM 

5000 REM*** INFORM *** 

5002 P0KE36879,76 

5005 PRINT"3S»****SWASTER MIMD"******" 

5020 PRINT"S*JAG TANKER PA EM KOD PA FVRA SIFFROR <l-8) SOM DU SKA KNACKA" 
5025 PRINT" 

5030 PRIMT"!iEFTER VARJE GISSNING VISAR JAG HUR MAMGA SOM SITTER RATT 1*3 1 
5040 PRINT"fiCCH HUR MAMGA SOM SITTER PA FEL PLATS **3" 

5045 PRIMT" AVSLUTA RADERNA MED ' *r' 

5048 PRI NT" INVAND CRSR <- FOR ATT FLVTTA UTAN UTSKRIFTS" 

5050 PRINT"■DU HAR 10 FORSOK " 

5068 PRIMT" M«a:r;■GOSUB 8000 

5100 REM*** ANTAL ** *** SPELARE ** 

5105 P0KE36373,15 : PRINT"^«SW*IUR MAMGA SPELARE<1-4>" 

5110 INPUT"T;ATX 

5115 IFATXC10RATX>4THEN5100 

5120 F0RT=1T0ATX 

5130 PRINT"N«!7v , AD HETER SPELARE "T 
5135 PRINT":?WOGST 10 BOKSTAVER" 

5140 INPUT"*r ;S$<T> 

5145 IFLEM<S t < T> »10THEN5130 
5150 MEXTT : RETURM 
6000 REM** VEMS TUJ?. ** 

6010 PRINT" WSS" : GOSUB8000 

6020 SPX=SPX+1 : IFSPX»1THENPRIMT"rUMMDKE J "S$<SPX>•PRINT"DU BÖRJAR !"=GOTO6030 
6025 PRINT"7WWÖ3KEJ "St<SPX>•PRINT"NU AR DET DIN TUR" 

6030 PRIMT"SSOTRYCK IM EM KNAPP MAR DU AR BEREDD !" 

6058 GOSUB8010 
6060 GOTO20 

7000 REM** RESULTAT *# 

7001 IFATX<2THENRETURM 

7015 PR I MT" TIS" TAB < 6 ) 

7016 F0RT=1T08=PRIMT"a"MIBt<"RESULTAT", T, 1>;■FORR=1TO150 : NEXTR,T 

7017 PRIMT 

7018 IFATXC3THENPRINT" SslIU HAR BADA SPELAT EN GANG VARS" : GOTO7030 
7020 PRINT"SMNU HAR ALLA SPELAT EN GANG VARS" 

7O30 F0RT=1T0ATX 

7040 IFFOX<T)»0THENPRIMT"M"St<T>" LYCKADES INTE" : GOTO7060 
705Ö PRINT"S"St<T)" GJORDE"FOX<T>"FORSOK" 

7060 MEXTT 
7070 RETURN 

3000 PRIMT"TRYCK IM EM KNAPP !" 

8010 GET AT I FA tO " " THEMPETURM 
8020 GOTO8010 

READY. 
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Text och grafik 
samtidigt 

Tricket går ut på att man gör om ett 
text-tecken till ett grafik-tecken. Så här 
går det till: när man skriver något på 
bildskärmen, står detta tecken i bild¬ 
skärmens RAM. Detta tecken kommer 
man endast åt med PEEK och man får 
då bildskärmskoden. Exempel: uppe 
till vänster står tecknet ”A”. Trycker 
man nu in ”PRINT PEEK (1024)”, så 
får man som resultat talet 1. Med detta 
tal kan datorn hitta tecknet i teckenge¬ 
neratorn. 

Ett tecken består av en 8x8-matris 
(se bild). En rad i denna matris kan 
man framställa med ett tal. Är t ex bit 
7 satt, så får man talet 128 (2u7). Är 
flera bitar satta, så får man motsva¬ 
rande tal genom addition. Bilden visar 
detta med bokstaven A. Tecknet står 
kodat på detta sätt i teckengeneratorn. 


Nu behöver man bara bildskärmsko¬ 
den för att läsa ut motsvarande tecken 
ur teckengeneratorn. Då man inte 
kommer åt teckengeneratorn från BA¬ 
SIC, flyttar maskinkodsprogrammet i 
rad 1 till 6 teckengeneratorn till slutet 
av BASlC-RAM:et (adress 34816 och 
framåt). Samtidigt sätts slutet på 
BASIC-RAM:et till denna adress för 
att skydda mot överskrivning. Till 
programmet: huvudprogrammet, som 
flyttar tecknet från lagringsområdet 
1024—2023 till området 8192—16192 
utförs som underprogram (rad 1000 till 
1050). Det anropas i rad 50, som över¬ 
för följande parametrar: i ZE står ra¬ 
den (0 till 25, 0 betyder överst) och i SP 
står kolumnen (0 till 39, 0 betyder 
vänstrast), varifrån texten ska stå. 
Texten står i variabeln TES. Med hjälp 
av STRS kan även numeriska variabler 
skrivas ut, t ex. TES = STRS(A). I VF 
står tecknets färg och i HF bakgrunds¬ 
färgen. För färgerna används talen 0 
till 15 som vid utnyttjande av färg- 


RAM:et (o = svart, 1 = vitt o s v). 

När underprogrammet anropas, 
skrivs texten ut i rad 1000. På bildskär¬ 
men står först färgrika fyrkanter, då 
bildskärms-RAM:et ju används som 
färg-RAM. Rad 1010 beräknar lag- 
ringsläget i färg-RAM:et (1024 till 
2023) och den därtill hörande adressen 
i bildskärmens RAM (8192 till 16192). 
1 rad 1030 läses tecknen av och början 
på kodningen i den förskjutna tecken- 
generatorn beräknas. Rad 1040 slutli¬ 
gen, skriver ut detta tecken på skär¬ 
men. För övrigt tilldelas variabeln CPS 
styrtecknen läCURSOR HO¬ 
ME+24*CURSOR DOWN. Därmed 
når man lätt varje position på skärmen 
(se rad 1000). Det fungerar med grafi¬ 
ska tecken också. Tänkvärt är att man 
ändrade i den förskjutna teckensatsen 
och på så sätt fick t ex grekiska tecken. 
Till sist: detta program fungerar bara i 
högupplösnings-moden, då datorn 
fortfarande försöker skriva ut orginal- 
tecknen. 


Så fungerar en 
Joystick 

Joysticken verkar bli ett ”kultobjekt” 
för en hel generation. Fast man fasci¬ 
neras över den, är konstruktionen en¬ 
kel. Ett par passiva elektronikkompo¬ 
nenter och lite mekanik är hela hemlig¬ 
heter. 

”Joystick” kallar man en apparat 
med en styrspak, som användaren kan 
flytta i minst fyra riktningar och som 
överför styrsignaler som motsvarar 
spakens läge till den anslutna datorn. 
Det finns naturligtvis mer än bara en 
sorts joystick. Inte bara kvalitén, utan 
även konstruktionsprincipen skiljer 
dem åt. 

Styrspaken är dock typisk. Ena än¬ 
den är förbunden med en låda, på ett 
sätt som tillåter ca: 30 graders avvikel¬ 
se i varje riktning (det skiljer sig från 
joystick till joystick). Själva styrspa¬ 
ken kan vara konisk, rak eller böjd, 
platt eller greppvänligt formad och 
gjord av trä, plast eller metall. Hur 
joysticken ser ut har dock väldigt lite 
att göra med funktionsprincipen. Men 
för att joysticken ska fungera bra även 


i snabba spel, är dessa skillnader avgö¬ 
rande. 


Digitala Joysticks känner 
bara riktningen 

Vad som intresserar oss är de olika 
funktionsprinciperna. Man har två hu¬ 
vudtyper: de ”binära” som bara kän¬ 
ner t ex ”höger” eller ”inte höger” 
och de ”proportionella” som känner 
hur långt från mittläget styrspaken be¬ 
finner sig. För enkelhets skull kallar vi 
dem digitala respektive analoga joy¬ 
sticks. 

De digitala har binära utgångssigna- 
ler och består i det inre av ett litet antal 
strömbrytare (minst 4), som är ordna¬ 
de som en cirkel eller ett kors. Dessu¬ 
tom finns en rund eller fyrkantig bas¬ 
platta fastsatt på styrspakens nedre 
del. När man rör på styrspaken kan 
denna platta med hjälp av piggar tryc¬ 
ka ner en eller högst två strömbrytare. 
Då aldrig mer än två strömbrytare kan 
tryckas ner samtidigt, får anordningen 
exakt dubbelt så många urskiljbara 
riktningsangivelser som det finns 
strömbrytare. Eftersom färre än fyra 


strömbrytare är vettlöst, har en joy¬ 
stick minst åtta riktningar. Det finns 
joysticks med åtta strömbrytare och 
alltså sexton riktningar. De kan dock 
inte anslutas till alla datorer, då det 
krävs mer hårdvara för att utvärdera 
signalerna. Användningsvärdet ökar 
naturligtvis ju fler riktningar joystic¬ 
ken har. Oftast finns även skjutknapp, 
som dock inte har med styrningen att 
göra. 

Strömbrytaren består tyvärr ofta ba¬ 
ra av en välvd metallplatta över två 
elektroder. När metallplattan trycks 
ner, förbinder den de två elektroderna 
och sluter kontakten. Denna konstruk¬ 
tion har två stora fördelar för tillver¬ 
karen: den är billig att tillverka och 
sörjer dessutom för styrspakens fjäd- 
ring, när man släpper styrspaken fjäd¬ 
rar ju metallplattan tillbaks och för 
styrspaken till sitt ursprungsläge. 
Nackdelarna för användaren är dock 
ganska graverande: plattan kan gå 
sönder av utmattning efter en tid och 
förlora fjädringskraft (styrspaken 
återtar ej ursprungsläget) eller glida 
(kontakt blir svårare). Är inte kontak¬ 
terna förbyllda uppstår ännu en fara. 
Då kan nämligen metallen oxidera och 
bara vid väldigt hårt tryck kan rätt sig¬ 
nal erhållas. 
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De erhållna signalerna matas in pa¬ 
rallellt i datorn, som tolkar signalerna 
som binära tal. Varje läge på styrspa¬ 
ken motsvarar exakt ett binärvärde. 
Detta lagras i en reserverad minnescell 
(dess adress finner man ofta i hand¬ 
böckerna). Så här långt behandlar näs¬ 
tan alla datorer joysticksignalen på 
samma sätt. Hur ett program sedan be¬ 
handlar detta värde skiljer sig lika 
mycket som programmen själva. För 
det mesta har programmet en tabell 
med olika värden som den jämför med 
den reserverade minnescellen. Ett an¬ 
dra värde i tabellen tala om hoppad¬ 
ress för fortsatt programexekvering. 
Teoretiskt kan en rörelse uppåt med 
styrspaken utan vidare motsvara cur- 
sorförflyttning åt höger. Vad som ska 
hända vid en viss spakrörelse bestäms 
alltså helt av programmet. 

Av den digitala joystickens kon¬ 
struktionsprincip framgår en, för an¬ 
vändaren viktig egenskap: då varje lä¬ 
ge på styrspaken motsvarar ett binärt 
värde, ändrar inte styrkan man trycker 
med detta värde. Då vet inte datorn 
hur hårt användaren tryker. 1 t ex ett 
rymdspel är det alltså meningslöst att 
försöka få ett rymdskepp att röra sig 
fortare genom att trycka hårdare på 
styrspaken. 

Dyr men fin: 

Analoga Joysticks 

Saken ser annorlunda ut hos den ana¬ 
loga joysticken. Denna oftast mycket 
dyra ”lyxspak” består istället för 
strömbrytare av två potentiometrar 
(mekaniskt ändringsbara elektriska 
motstånd), vars rotationsaxlar står i 
rät vinkel i förhållande till varandra — 
motsvarande koordinataxlar på en två¬ 
dimensionell bildskärm. 1 bild 2 kan 
man se en analog joystick med två van¬ 
liga vridpotentiometrar. Styrspakens 
upphängning är något problematisk, 
då den dels ska vara rörlig i alla rikt¬ 
ningar, dels ska överföra vridrörelser 
till de båda potentiometrarna. För det 
mesta använder tillverkaren halvcirkel- 
formade böjda ”klämmare” som i sin 
tur är rörliga runt en axel, nämligen en 
av potentiometeraxlarna. 

Det finns för övrigt ansatser till ele¬ 
gantare lösningar på det mekaniska 
problemet med lysdioder och fotocel¬ 
ler som ändringsbara motstånd. Vid 


spakrörelse skulle dessa förmörkas be- 
röringsfritt. 1 princip kan varje fysisk 
effekt som orsakar motståndsändring 
omvandlas på ett eller annat sätt och 
möjligheterna är långt ifrån uttömda. 
Här finns en chans även för amatör¬ 
byggare och hobbyuppfinnare. 

Uppbyggandet av en analog joystick 
är dyrt framförallt på grund av den på¬ 
kostade mekaniken. För användaren 
är det viktigt att veta om han överhu¬ 
vudtaget kan ansluta en analog joy¬ 
stick till sin dator, det krävs nämligen 
en analog ingång för det. Denna måste 
ha en kontakt som levererar en spän¬ 
ning till joysticken. Denna spänning 
reduceras proportionellt mot styrspa¬ 
kens avvikelse och skickas tillbaka till 
datorn. Då krävs naturligtvis två kana¬ 
ler in och två kanaler ut ur joysticken. 

Analoga värden måste 
omvandlas till digitala med 
A/D-omvandlaren 

I motsats till den digitala joystickens 
signaler, kan inte datorn använda den 
analoga signalen utan föregående sig¬ 
nalbehandling. Därför måste datorn 
ha en A/D-omvandlare inbyggd i in¬ 
gången. Denna A/D-omvandlare 
omsätter ett analogt spänningsvärde 
till ett digitalt. Det digitala värdet kan 
vidarebefordras från omvandlaren 
som parallella eller seriella binära sig¬ 
naler. Dessa signaler lagras i en reser¬ 
verad minnescell, precis som för digi¬ 
tala joysticks. Vad som sedan händer 
avgörs av det aktuella programmet. 

Hur bra upplösningen på riktningar¬ 
na och avvikelserna blir, beror främst 
på hur många bitar A/D-omvandla- 
rens digitala signal består av. Levere¬ 
rar en omvandlare t ex en 8-bit-signal, 
så kan den därmed framställa 256 oli¬ 
ka värden. Med två kanaler motsvarar 
det 512 värden för en tvådimensionell 
rörelse. Jämför man det med de 8 vär¬ 
dena för en normal digital joystick, 
förstår man fördelen med den analoga 
konstruktionen. Med den analoga styr- 
spaken kan man t ex även låta styrkan 
som användaren trycker med användas 
för hastighetsreglering av ett flygande 
tefat i ett ”star war”-spel. Den som en 
gång njutit av att spela TV-spel på det¬ 
ta sätt, får allt svårare att nöja sig med 
den enkla digitala joysticken. 
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Lägg in Joystick i dina spel 


Många som konstruerar spel låter spe¬ 
let styras av tangenter i stället för med 
joystick. En nackdel med detta är att 
datorn lätt blir misshandlad i stridens 
hetta. Även om du tar det försiktigt 
med datorn så finns det många som 
tycks tro att skotten går längre, ju hår¬ 
dare de trycker pä tangenterna. 

Om du har möjlighet så lägg in joy- 
funktioner i dina spel. Går det att lista 
spelet, så kan du snart klura ut hur du 
skall göra. 

Följande instruktioner avser VIC- 

20 . 

Pröva följande grundprogram. 

1/ POKE 37154,127 
1//A = PEEK (37137) 

11/ B = PEEK (37152) 

2// IF NOT A AND 4 THEN PRINT ”UPP” 

21/ IF NOT A AND 8 THEN PRINT ”NER” 

22/ IF NOT A AND 16 THEN PRINT ”VÄNSTER” 
23/ IF NOT B AND 128 THEN PRINT ”HÖGER” 

24/ IF NOT A AND 32 THEN PRINT ”FIRE” 

3// GOTO 1// 

Rad 10 ställer om ingångarna så att 
joystick HÖGER kan användas. Den 
omställningen behöver bara anges en 
gång i programmet. Förslagsvis lägger 
du den i början av programmet. 

När man vill ha en ny spelomgång så 
är det bekvämare att trycka på FIRE i 
stället för på en tangent. Det gör du så 
här. 

4/// PRINT ”EN GÅNG TILL” 

4/1/PRINT 
4/2/PRINT ”(J/N) 

4/3/ GET XS 

4/4/ IF XS=.”J” THEN (lämpligt startnummer) 

4/5/ IF XS = ”N” THEN 5/// 

4/6/A = PEEK (37137) 

4/7/ IF NOT A AND 32 THEN (lämpligt startnummer) 
4/8/ GOTO 4/3/ 

5///PRINT ”HEJ DÅ” 

5/1/NEW 


Rad 4/3/ söker av tangentbordet. 

Är J nertryckt så går datorn till det 
nummer du har angett. Är N nertryckt 
så avslutas spelet, och minnet raderas i 
rad 5/1/. 

Är ingen tangent nedtryckt så kon¬ 
trollerar rad 4/7/ om FIRE är ned¬ 
tryckt på joyen. Rad 4/8/ gör att sling¬ 
an börjar om från början på rad 4/3/. 

Om du har lagt in en instruktions¬ 
text i början av programmet, så upp¬ 
står det problemet att du inte hinner 
släppa FIRE knappen förrän texten 
har blinkat förbi. Det löser du genom 
att lägga in en fördröjningsslinga i 
programmet. 

1// PRINT ”instruktionstext” 

11/ PRINT 

12/ PRINT ”KLAR ATT SPELA ?” 

13/FOR A = 1 TO 9///: NEXT 
14/ A = PEEK (37137) 

15/ IF NOT A AND 32 THEN radnummer för spelstart 
16/GET AS 

17/ IF AS ”” THEN radnummer för spelstart 
18/ GOTO 14/ 

Rad 13/ är en fördröjning så att det 
inte blir ”dubbelslag” med FIRE 
knappen. 15/ känner av om FIRE är 
nedtryckt. 17/ kontrollerar om någon 
tangent är nedtryckt, (om AS är större 
än ingenting. I så fall fortsätter datorn 
på den rad du har angett. Annars så 
fortsätter slingan på rad 14/. 

Får du problemet att datorn är så 
snabb att det blir dubbelslag. Då kan 
du lägga in en fördröjningsslinga in¬ 
nan datorn söker av tangenter och joy¬ 
stick. - 

3/// utfört instruktionen 
3/1/GOTO 4/// 

4/// FOR A = 1 TO 1//: NEXT 
4/i/ avläsningsslingan 
41// GOTO 4/1/ 

Lycka till med ditt progamerande. 

Skäftingebackens datorörnar 
Alf Olsson 
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VIC-rapport är bra! 


VIC-rapport är i stort en bra tidning. 

Det framgår av den läsekretsunder¬ 
sökning som genomfördes i VIC- 
rapport nr 5/6. 

Här nedan kan Du själv läsa vad 
VIC-rapports läsare tyckte. Det är me¬ 
delvärden som redovisas. 

Elva omdömen om innehåll resp. 
text sattes på en femgradig skala. 


LEDARE . 

NYBÖRJARSKOLAN. 

KURSISTRUKT. BASIC. 

ASSAMBLERSKOLAN. 

COMANKURSEN. 

PROGRAMMERINGSTEKNIK. 

NYHETSPRESENTATIONER. 

FRÅGOR OCH SVAR. 

KAPTEN STORÖRA. 

ANNONSER. 

SMÅTIPS. 

GENOMSNITTLIGT MEDELVÄRDE 


Innehållet 

Text 

3.4 

3.9 

4.0 

4.1 

3.2 

3.3 

3.7 

3.3 

3.3 

3.3. 

4.1 

3.8 

3.8 

4.1 

3.5 

3.9 

3.0 

3.8 

3.7 

4.2 

3.9 

4.0 

3.6 

3.8 


Av ovanstående sammanställning 
kan vi utläsa följande: Innehållsmäsigt 
får PROGRAMMERINGSTEKNIK 
och NYBÖRJARSKOLAN goda 
omdömen (4.1 resp. 4.0). 

Likaså ser vi att SMÅTIPS och NY¬ 
HETSPRESENTATIONER har högt 
läsvärde (3.9 resp. 3.8). ANNONSER 
och ASSEMBLERSKOLAN noterar 
båda 3.7 för innehållet. 

På den femgradiga skalan blir hel¬ 
hetsomdömet för innehållet 3.6. Läs¬ 
barheten frågade vi också om, och där 


ser redaktionen att tidningen genom¬ 
gående har en god läsbarhet (3.8). 

Högsta läsbarheten har ANNON¬ 
SER noterade 4.2 i läsbarhet på en 
femgradig skala måste annonsmakar¬ 
na uppfatta som ett gott betyg på sitt 
hantverk. Grattis. 

Bakläxa får tidningen på de avfoto¬ 
graferade listorna, vilka främst före¬ 
kommer i kursavsnitten. 

Redaktionen hoppas kunna förbätt¬ 
ra reproduktionen av dessa listor. Re¬ 
daktionen drar den slutsatsen att läsar¬ 


na tycker om VIC-rapport, men vill ha 
en förbättring avseende listor. 

Många läsare har också befogat brev 
med förslag, vilka redaktionen kom¬ 
mer beakta efter ytterligare studium. 

Redaktionen tackar alla som har 
sagt sin mening och hoppas att vi till¬ 
sammans med er kan göra en ännu 
bättre VIC-rapport i framtiden. 

Thomas Flink 
Redaktionen 
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Experiment med VIC-20 


En VIC-20 kan förvisso användas till 
mer än spel. Kanske datorns stora an¬ 
vändningsområde kan vara experiment 
och försök. Det relativt lilla minnet är 
här knappast något hinder eftersom 
många s k vetenskapliga program är 
föredömligt korta. Att lösa svåra 
problem på ca 500 bytes är inte ovan¬ 
ligt. 

Jag skall här redovisa några experi¬ 
ment med slantsingling m a o statistis¬ 
ka experiment. De experimentserier 
jag redovisat här har jag inte funnit re¬ 
dovisade förut. Utan en dator är de 
nämligen i praktiken omöjliga att ge¬ 
nomföra. Jag har alltså befunnit mig i 
en situation som statistikforskare tidi¬ 
gare bara kunnat drömma om och 
knappast det. 

Varför frågor nu någon. Varför gör 
man nu detta, som jag skall redovisa. 
Ja själv anser jag det vara en bland¬ 
ning av konst och högst grundläggande 
vetenskap. Mina experimentförutsätt¬ 
ningar har varit helt ideala, varför det¬ 
ta även är en redovisning av det per¬ 
fekta experimentet. Tack vare VIC-20 
har jag kunnat genomföra en försöks- 
serie som helt manuellt aldrig skulle ha 
genomförts. 


Experimentserie 1 

Min första experimentserie gällde för¬ 
delningen av krona och klave vid olika 
antal kast. Varje seriestorlek (10, 100, 
1000 och 10000 kast) testades 30 gång¬ 
er. Sammanlagt simulerades således 
333 3000 slantsinglingar. Resultatet re¬ 
dovisas i tabell 1. 


Tabell I. Fördelningen av krona och 
klave vid 30 experiment för varje serie¬ 
storlek 


Seriestorlek 

Antal krona 

Antal klave 

10 

5,4 

4,6 

100 

49,5 

51,5 

1000 

491,8 

508,2 

10000 

4974,8 

5025,2 


Program för experiment 1 

10 PR1NT ” ” 

20 H = 0 
30 L = 0 

40 INPUT ”ANTAL KAST”; A 
50 PRINT ”TA DET LUGNT!” 

60 PRINT ”DETTA TAR KANSKE” 
70 PRINT ”LITE TID, SER DU” 

80 FOR J = 1 TO A 
90 K= INT (RND (1) * 2)+ 1 
100 IF K= 1 THEN H = H+ 1 
110 IF K = 2 THEN L = L + 1 
120NEXT J 
130 PRINT” ” 

140 PRINT H; ”KRONOR” 

150 PRINT L; ”KLAVE” 

160 END 


Experimentserie 2 

Nästa experimentserie gällde hur 
många kronor i rad som maximalt 
kom upp vid olika seriestorlekar. Var¬ 
je seriestorlek testades 10 gånger. Re¬ 
sultatet visas i tabell 2. 

Tabell 2. Antal krona i rad som mest 
vid 10 experiment för varje seriestorlek 


Seriestorlek Maxantal i rad 


10 5 

100 7 

1000 12 

10000 14 


Program för experiment 2 

10 PRINT” ” 

20 A = 0 
30 P = 0 

40 INPUT ”ANTAL KAST”; B 
50 PRINT ”TA DET LUGNT” 

60 FOR L = 1 TO B 

70 K = INT (RND (1) * 2) + 1 

80 IF K = 1 THEN A = A + 1 

90 IF K = 1 AND A P THEN P = A 

100 IF K = 2 THEN A = 0 

110NEXTL 

120 PRINT P; ”KRONOR 1 RAD” 

130 PRINT ”SOM MEST” 

140 END 


Slutord 

Jag har här visat på ett kaske annor¬ 
lunda sätt att bedriva stimulerande 
verksamhet med hjälp av en VIC-20. 
Som synes är det utnyttjade program¬ 
men mycket korta och knappast spe¬ 
ciellt komplicerade trots att de löst 
högst besvärliga simuleringar. Min re¬ 
dovisning hade kunnat göras väsentligt 
mer avancerad men min målsättning 
var bara att teckna en idé, ett använd¬ 
ningsområde för hobbydatorn VIC-20. 
Jag hoppas att jag stimulerat någon el¬ 
ler några andra att ta sin VIC-20 till 
hjälp i forskningen, både på amatör- 
och yrkesnivå. På amatörnivå därför 
att många VIC-20 ägare förmodligen 
har en gryende forskare inom sig. Jag 
tror nämligen att intresse för datorer 
och forskning kan hänga intimt sam¬ 
man. Låt mig snart få läsa om Era re¬ 
sultat i VIC-Rapport. _ „. , .. 

Bernt Ekström 
Lunds tekniska högskola 
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GRATISANNONSER 



VIC 64 * PROGRAM * BYTES 

Jag önskar byta program, har cirka 50 
program sänd en lista till Pär-Uno 
Nilsson, Pl 5281,441 90 Alingsås. 

BYTES, SÄLJES VIC-20 
Spel. Jag har bl a Dracula 16 K, Krazy 
Kong 16 K, Wachy Waiters och Grafik 
spel, och mycket annat. Skriv el ring 
till Tommy Lindroos, Vasamatie 19, 
334 50 Siivikkala, Tammerfors, Fin¬ 
land. Tel. 009/358/31/46 09 40. 

Vill Du ha list, print, Ioad, run, save 
m m på funk-tangenterna till VIC 64. 
Programkassett 35:— betalas till post¬ 
giro 466 09 98-8. Conny Haglund. 

SÄLJER ELLER BYTES 

Program till VIC-20. Spelen är av bra 
kvalité. Hans Roine, Linnéavägen 4, 
197 00 Bro. Tel. 0758/41 415. Säkrast 
efter kl. 16. 

TRAV VIC-64 BIORYTM VIC-64 

TRA V: Spela vinnare och plats väl¬ 
gjort realistiskt spel 9 KB utan list¬ 
skydd 

BIORYTM: Är du i form? Sätt in 59 
kr på PG 456 05 17-7. Ronny Larsson, 
0383-158 96. 

BEG. VIC-64 KÖPES 

Ring 08/87 39 31 

TILL VIC-64 

Ultrabasic, 50 st extra ljud och grafik¬ 
kommando + Superskramble för en¬ 
dast 200:—. Nypris 420:—. Tel. 040- 
96 99 90. 

TILLBEHÖR TILL VIC-20 

Expantionslåda 6 uttag 500:—. Expan- 
tionskort med inbyggt 8K minne, 2 ut¬ 
tag 400:—. Micro Assembler med mo¬ 
nitor, Programmers aid och höggrafik- 
kommandon. 500:— 8K minne 300:—, 
VIC-graf 250:—. Texas instruments 59 
med Mathutility modul + Master Lib- 
modul 800:—. Texas Instruments 
Programmer, räknar i Decimalt, 
Oktalt, Hexadecimalt 350:—. Miche 
08/61 76 59,026/12 26 02. 


VIC-20 

Säljes: Cartridge: Avanger, Poker, Ju- 
piter lander 90:— st eller 225 för alla: 
ZAP! POW! BOOM! Arcade games 
for VIC 20 75:—. Programmerings¬ 
handboken: 75:—, Bygg ut din VIC: 
50:—, Basic på VIC-20: 30:—, Niklas 
Björklund, Bråviksvägen 18, 603 65 
Norrköping, 011-11 82 95. 

SÄLJES 

SEX st kassettband C-20 för datapro¬ 
gram säljes för endast 45:— insatt på 
pg 85 99 92-0, Lars Erik Larsson, Box 
14, 665 00 Kil. Önskas mot postför¬ 
skott tillkommer 8:—. 

VIC 20 — MARS LANDER 

En ny version av detta kända spel. Du 
skall genom stora grottsystem och lan¬ 
da rätt. Kämpa mot bränslebrist, eld¬ 
klot, naturen, hinder m m. Flera olika 
kartor. Ordp. 95 kr, Nu: 55 kr. Lars 
Olsson, L. Anrås 6511, 444 00 Ste- 
nungsund. 

VIC 64 SPEL BYTES 

Scramble och Supergridder, båda köp¬ 
ta maskinkod pgm bytes mot liknande 
spel. Mikael Johansson, Cyklamensti- 
gen 7, 432 00 Varberg. 

KÖPES 

Beg. VIC-64. 0381/112 12. 

VIC-20 SÄLJES 

Dator + bandspelare. ÅÄÖ. Superex- 
pander. Plug-inspel: Jubiter Lander. 
VIC kassett 1&2. 4 böcker. En hel del 
program. Ring fr. efter 17 och helger 
till 0456-313 14. Pris: 3 000:—. 

SPEL TILL VIC-20 BYTES 

Ring till Robert Jansson efter kl. 
17 00. Tel: 0121/138 18. 

VIC-20 SPEL 

3D Time Trek 16 K 95:—, Krazy Kong 
16 K 95:—, Skyhawk 3 K el. 8 K 95:—, 
Flipper oexp. 80:—, Night Crawler 
oexp. 70:—, Race Fun oexp. 70:—. 
Mats 0150-513 15 efter 17.30. 


**VIC-64 PROGRAM BYTES** 

Häftiga spel i maskinkod och superba 
nyttoprogram bytes mot allt som kan 
köras på bandstation. Tel: 0171/- 
309 36 Petter eft. 16. 

BYTES 

VIC 64 program bytes. Jag skulle vilja 
byta program och erfarenheter. Tel. 
0171-358 99 Jocke. 

BREVVÄNNERSÖKES 
Äger du en VIC-20 och vill ha brevvän¬ 
ner att byta erfarenheter och pro¬ 
gram??? Skriv då till Leif Lindström, 
Dahlanderg. 39, 703 48 Örebro. 

* VIC-64 SPEL BYTES* 

Fyra spel (värde 450 kr) Frogger, Pa- 
nic, Scramble, Gridrunner bytes mot 
Cartridge spelet Cupfinal. Var du än 
bor ring 08/776 18 87. Fråga efter 
Charlie. 

SPEL-CARTRIDGE 

till VIC-20. Super Slot. Suveränt ljud 
och grafik. Säljes t. förmånspriset 
150:— Best. till Magnus Hyltén, Box 
129, 232 02 Åkarp. Tel. 040-46 48 46. 

VIC-20-H ANDBOKEN 

Erbjudande: Ny användarmanual säl¬ 
jes till förmånspriset 45:— OBS! Jätte- 
billigt Best t. Magnus Hyltén, Box 129, 
232 02 Åkarp. Tel. 040-46 48 46. 

VILLIG VIC-20 SÄLJES 

VIC-20 med svenska tecken, superex- 
pander, maskinkodsmonitor, använ¬ 
darmanual, programmering handbok 
och VIC-revealed. Massor av spel bl a 
Skramble, Exterminator, Snakman 
och Gridrunner på kassett. Jelly mon¬ 
sters och Rat Race på pluginkassett. 
Joystick medföljer. Nypris c:a 5 000 
kr. Nu endast 2 995 kr. Skriv snarast 
till Pär Bergström, Alabamagatan 2, 
593 00 Västervik eller ring 
0490/112 67 efter kl. 16. 

SV. MANUAL TILL 64:AN 

Svensk användarmanual till VIC-64 
50:—. VIC-news år 1 nr 1,2, 3, år 2 nr 
1, 10:—/styck. Tel 013-17 02 32. 


39 






PROBLEM MED DIN MPS-801? 

MPS-801 kan krångla lite mot VIC-20 
ett maskinprogram från mig löser 
problemet information mot Porto. Ulf 
Larsson, Söndrumsv. 60, 302 39 

Halmstad. 

KÖPES 

VIC BANDSPELARE, max: 200:— 
300:—. Andreas Elner, ErikDahl- 
bergsgatan 8, 211 48 Malmö. 

VIC-20/64 RESETKNAPP 

Ingen lödning eller annat ingrepp. 
Fungerar ej tillsamans med printer el¬ 
ler flexskiva. Pris 25:— på pg 
478 95 08-1, eller skicka kontant till 
Peter Månsson, Fårhagsvägen 18, 
583 21 Linköping. 

VIC-20 TILLBEHÖR 

VIC-1110 8 K Ram expansionsminne 
350:—, V1C-1922 Cosmic Druncher 
spelmodul 250:—. Tel. 026/25 67 69, 
Göran Sandström. 

VIC-20 

Bonzo, Amok, Millipede, Roadtoad 
+ läroboken från spel till Basic — kas¬ 
sett med 7 st. spel. Allt detta säljes för 
endast 300:—. Tel: 0591-136 76. 

SÄLJES: VIC 20 

VIC 20 med bandspelare, Superexp., 
böcker och kassetter med program. 
Pris: 2 500 kr. 0920-547 46. Lars- 
Göran. 

VIC 20 TILLBEHÖR 

Basic, Grafik och ljud på VIC 20 45:— 
st, VIC-Sloi plugin: 100:7, Kemipro¬ 
gram 8 K 75 kr. Glosprogram 8 K 75 
kr. Ring gärna för mer info. på tel. 08- 
768 44 21 eller skriv till: Andreas Jaki- 
bik, Sätraängsväg 136, 182 37 Dande- 
ryd. 

SÄLJES VIC-64 

VIC-64 med 14” Dux färgTV säljes för 
5 000:— (nypris 6 595:—), använd 3 
mån. VIC-64an utan TV 3 300:—. 10 
program på kassett medföljer. Tel. 
026-791 20. 

VIC-20 SPEL BYTES 

VIC 20 spel bytes. Stort sortiment. 
Skicka lista över dina spel till: Karl 
Pettersson, Avstyckningsvägen 24, 
175 43 Järfälla. Obs. skriv telnr. 


* VIC-64 BANDIT-SPEL* 

Säljes ett nytt program på kassett + 
frakt. Pris 80 kr. S. Muto, Sernanders- 
vägen 15—311,752 62 Uppsala. 

VIC-20 + TILLBEHÖR 

VIC-20 + 3, 8, 16 K-minne + Reset + 

5 st handböcker + 40 st maskinkods- 
spel + nyttoprog och div. Basic prog. 
+ många goda råd och ett glatt hu¬ 
mör. Nypris 4.600:— Nu endast 
3 200:—. Jocke Cederblad, 0758/- 
171 96. 

FÖR RADIOAMATÖRER 

RTTY-Program till VIC-64. Program¬ 
met arbetar med Split-Screen, skriv 
ditt svar medan du tar emot. QTH-lo- 
katorprogram, nya och gamla syste¬ 
met. Tomas, tel. 0515/165 30 e. 18.00. 

TILLFÄLLE! VIC 20 SPEL 

Jelly Monsters + andra toppspel på 
plugginkassett säljes eller ev bytes mot 
andra spel. Tel. 0980-818 75. 

DUBBELFLOPPY* VIC-64 

Floppy 3040 samt interface ”Inter- 
pod” (se ex annons i Compute nr 9/83 
sid 129). Interpod fungerar till alla 
CBM-Floppys, printers, m m. Pris: 
Floppy ca 4 000:— samt för interpod 
ca 1 000:— Ring Åke Setréus, 08- 
39 26 86 kv. 

**16-K KÖPES** 

16-K minne till VIC-20 köpes för unge¬ 
fär 400 kr tel. 08-768 24 66. 

KÖPES 

Gamla nr av Compute! och Computels 
Gazette köpes. Urban Svanberg Karls- 
lundsgatan 60, 151 60 Södertälje. Tel. 
0755-840 33 eller 655 96. 

VIC-20 TILLBEHÖR SÄLJES 

VIC 1515 printer med papper 
2 095:—, VIC 1540 Floppy disk 
2 495:—, Super expander 325:—, VIC 
20 programmeringshandbok 85:—. 
Ring Johan Ekener, tel. 035/11 33 10 
på kvällstid. 

VIC 20 TILLBEHÖR 

Expansionsenhet VIC 1010 700:— 
40/80 tecken kretskort 500:—, Ma- 
kinspråksmonitor VIC 1213 200:—, 
bok Assebler på VIC 20 50:—. Per 
Ekstig, tel 026-10 37 97. 


SÄLJES VIC-20 SPEL 

En kassett med 5 spel Smack-man, 
Skramble, Cosmlads, Snakeybuilding, 
dessutom ett Glosövningsprogram. 
Pris 50 kr. Skicka pengarna till Pablo 
Grate, Rosenbergsgatan 8, 185 00 

Waxholm, så kommer kassett. 

VIC 1515 PRINTER 

Använd men perfekt. 1 250:—. Tel. 
031- 29 66 18 eft. 17 (V. Frölunda) 

*VIC-64 PROGRAM* 

Spel och andra program till VIC-64 
köpes! Skicka en lista med priser och 
vad du har för program till: Joachim 
Allermalm, Vallåkravägen 128, 261 90 
Landskrona. 

VIC 20 

Bra adventurespel i maskinkod köpes 
ej textspel. Ring 031-29 38 72, fråga 
efter Johan. 

ADVENTURE SÄLJES 

Mission Impossible-cartridge 150 kr. 
Lösning till ovanst. 10 kr. Ledtrådar 5 
kr. Tel. 013/15 1017 eft. 17.00 

VIC-20 SPEL BYTES 

För 3, 8, 16 K. (gärna grafik adv.) Tel. 
0753-257 79, Anders. 

VIC 20 ASSEBLER 

Plugg-in kassett inkl. 11-sidig mannu- 
al. 20 nya kommandon, Labels. 
349:—, frakt tillkommer. Skriv för yt¬ 
terligare info. till Olof Johansson, 
Scheelegatan 18, 521 00 Falköping. 

SÄLJES 

VIC 20, manual, bandspelare, Basic på 
VIC, progr handbok, introduktion till 
basic 1 samt 6 band, spel o nytto + 1 st 
joystick. Slumpas för 1.600:— + 
frakt. Kenneth Adelstål, Bergåsvägen 
38, 224 00 Anderstorp, tel. 

0371/158 08. 

VIC-20 spel säljes 3 st för 50 kr. Låd¬ 
des + 8K, Lotto med rättning, Dodge- 
cars, Boss Puzzle, Robot Attack, 
Skramble, Maximum + 3K, Amok 
(JS), Defender + 8K, Meteor Blaster, 
Mini Pacman. Vilka vill du ha? Pg 
459 26 40-9 Tore Gullstrand. 

VIC-20 VIC-64 

VIC-20: Cartridge Star Battle 150:—, 
eller byte mot VIC-64 Cartridge, har 
även kassettspel till VIC-20, VIC-64. 
Program bytes ev. säljes. Kontakta 
Erik Bertell, Ringv. 23, 824 00 Hu¬ 
diksvall, tel. 0650-161 74. 
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och video-dator-omkoppare (Televerkets krav) 
medföljer också (sc bild). 

Av datorer som säljs i Sverige krävs att de inte över¬ 
skrider de hårda svenska normerna för radiostör- 
strålning. Vic 64 är avstörd och godkänd enligt Tele¬ 
verkets normer! 


Boa t06J 43000 Aakm/Goiaborg T»l 031/7897 90 


ger *spr** 


Fr. w spel till 


tröjor för 


Beställ med 

prenumerations- 

kupongen 








5(vensk) 

Vic 64 i svensk version har Å-Ä-Ö-tecken inbyggda 
redan vid köpet, dessutom ingår användarmanual 
på svenska i priset. 

Av Vic 64 i svensk version fordras godkända anslut¬ 
ningsenheter. Transformator godkänd av SEMKO 


Finns i alla storlekar. 
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